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iS/Piero/Poleonue Z 
Exodus/ I TE 


»n id жс 499 өзе 


алиш ます いす すすま すま Los 


QD っ て 、 ス プイ / この 実感 は パソ コン に 詳し 


い 人 は ほど 強い よう で す 。 あ の “サン ター フォ ー ス ” 


も ナン ト 8 秒 の スピ ー ド スタ ー ト 、 イラ イラ 待つ 
時 間 に 耐 えて きた マニ ア に は 、 こ の スピ ー ド は 


な ん と も 魅力 に 違い あり ませ ん 。6 う 長い ブロ グ 


ラム も コワ な い 。 趣味 に 遊び に 仕事 に 熱中 。 
これ か ら は ダン ゼン QD で す , 


ー ソ ナル コン ピュ ー タ 


117-1500) 


、 標準 価格 89, 80005 


、 写真 の 14 型 カラ ー デ ィ ス プレ イ MZ- 1D15B 標 準 価格 
2,000 円 は オプ ショ ン 。 画 面 は ハメ コミ 合成 で す 


ゲー ム も 仕事 も スピ ー ド スタ ー ト 
フロ ッ ピ ー の 高速 性 と カセ ッ ト の 経済 性 を 備 を た 新 し 
い 記憶 装置 で プロ グラ ム や デー タ を 読み 取る 
n ド は 、 何と カセ ッ ト の 約 30 倍 (当社 2000: 
デー タレ コー ダ 比 )、 も う 気 持ち の 乗り も る 直 っ て きま す 
キャ ラク タブ づく り も 自 在 、 き わ だ つ グ ラフ ィ ッ ク 
グラ フィ ッ ク は ひと味 違 う ク リエ イ テ ィ ブ 設計 。 1000 
文字 の PCG ま だ は 320X200 ド ッ ト 8 色 フレ グラ フィ ッ ク 
十 24 文 字 の PCG が 使い 分 けら れ 、 目 的 に 合わ せ て 
オォ オリジ ナル グラ フィ ッ ク が 存 分 に 駆使 で きま す 。 
音楽 演奏 だ っ て お 手 の も の 
ペソ コン を より クリ エイ ティ ブ に 活用 する た だ ため の サウ 
ンド 機能 と し て 6 オク ター ブ 3 重 和音 の PSG を 2 チャ ン 
ネル 内 蔵 。6 重 和音 の 音楽 2 つの 効果 音 が 楽し ゅ 、 
音楽 演奏 、 サ ウン ド 効 果 に グン と 厚み を 増し て きま す , 


日 本 語 表 示 、 ワ ー プ ロ へ の 活用 も 
漢字 対応 QD-BASIC 
漢字 対応 BASIC を は じ め 、 漢 字 ROM ボ ー ド (オプ 
ショ ン ) 、 辞 書 ROM ボ ー ド (オプ ショ ン ) の サポ ー ト 
な ど 、 ワ ー プ ブロ へ の 対応 も 考慮 じ C い ます 。 


上 達 に 合わ せ て 進化 する 
64KB オ ー ル RAM の クリ ー ン 設計 
BASIC 以 外 の 言語 へ の 発展 性 を 秘め た 、 い わ ば 
あな た の 上 達 に 合わ せ て 進化 する シス テム 設計 で す 。 
護 能 力 を グン と アッ プ さ せる RAM フ ァイル プション ) | 
1500 が し ゃ で る パソコン に 、 ボ イス ボー ド ( は プシ ョ ツ ) 
ー ン エー ス 」 「 住 所 録 」 「 ミ ュー ジッ クエ ー ス 」「 デ モエ ー 

ス 」 な ど 、 買 っ た その 日 か ら 即 使 を 4 ソフ ト を バン ドル 。 

蘭 ス テッ プア ッ プ で きる 3 系 統 の CRT 端 子 久 カ ナ は アイ ウエ オ 順 、 機 能 
性 に 徹し た 使い や すい キー ボー ド 弁 ジ ョ イス ティ ッ ク 端 子 2 個 装備 8 
2 モー ド の プリ ンタ イン ター フェ イス 装備 諾 汎用 イン ター フェ イス 1 スロ ッ ト 
装備 < 主 な オプ ショ ン ?> 9RAMZ7ZTJVMZ-1R18 標準 価格 18,000 円 
載 ボ イス ボー ド MZ-1M08 標準 価格 10,000 円 考 漢 字 ROM ボ ー ド MZ- 


1R23 標準 価格 19,800 円 Фа ROM; — FMZ-1R 24 標準 価格 
22,0003 2U7)v7U 72 MZ-1P 14. 標準 価格 54,800 円 


2 セー 株式 会 社 жы 〒545 жїн Ех EDR 228228 11 (06)621- 1221 (X ft) @ お 問い 合わ せ は … 本 社内 国内 情報 シス テム 営業 本 部 まで 


* マリ オ 
1 ルン チ ポ ボー ル プ ブラザース 
幅広 い 年 令 層 に わたっ て 楽し め る あの 
マリ オ が 一段 と 興奮 度 を 高め て フレ ッ 
シュ アッ フ 。 


2 «хтб テニ ス 
ゲー ムセン ター や ファ ミリ ー コ ンピュータ 
で 人 気 の 高 い に テ ニス が MZ-1500 で 楽 
Ls i3, 

ワー プロ УУЧ: 
家族 みん な で 活用 で きる 、 学 習 機能 付 
ワー プ ブローカ レンダー 機能 。 ス ケ ジ ュ ー 
ル も 書き 込め ます 


vae d 


@⑳ テ レビ 東京 《 


ES 


4 ママ ・ キ ー ソ リー 
家計 簿 づ く ① は も う ラ クラ ク 。 数 字 を 入力 
する だ け で 1 ヶ月 の トー タル も バッ チリ 。 


5 スタ テイ メイ 人 


楽し みな が ら 学 習 で きる 、 堅 苦し い 勉 強 
ソフ ト と は ひと 味 違っ だ いわ ば パソ コン 
暗記 カー Ес 


6 BASICAS74 


いち いち マニ ュ ア ル を 見 な 〈 て も 、 画面 と 
の 対話 形式 で BASIC の 基礎 学習 が 
で きま すれ 


JOY JOY PACKII 
MZ-5A002 標 準 価格 16.800 円 


家族 ひと り ひ と り が 楽し ん め る / 竹 姜 の 新しい QD ン フ た を ワン パッ グ 。 


バー ティー メー カー 
誕生 パー ティ を は じ め 楽 し い 集い を 効果 
的 に 演出 し て くれ る グラ フィ ッ ク ソ フト で 


好評 JOY JOY PACK (MZ-5A001) 
醸 準 価格 16,800 円 も 発売 中 
① 日 本 語 ワ ー プ ロ 「 ff KOT v UE 
プ ブラザーズ ス ペ シ ャ ル 」③「 野球 狂 」(④ 
「 エ ンタ ー テ ィ ナ ー」⑤「 ホ ー ム ダイ アリ 
ー」⑥「 ソ パー ティ ー メ ー カ ー」⑦「BASIC 
スタ テイ 」 


テレ ビ 大 阪 @ テ レビ 愛知 
FZ 4 月 7 日 よ の 毎週 日 曜 9:30-10:00 
画 講 師 : Dr+ パ ソコ ン 宮 永 好 道 還 司 会 : 三波 豊和 ・ 白 石 ま る み 


頼 と 創造 の 富士 通 
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СОУ МАМЕ хау КЕС 
Sr OOIhN-NI ANA ЙҢШЕО 


重 メ イン メモ リ の 容量 アッ プ で 0S-9 Level 2 に 対 
応 。 湯 漢字 対応 強化 の F-BASIC V 3.5 を 標準 
Wj,621—97UL7F/8B8FM Logo を 標準 
添付 。 但 サブ プシ ステ ム の 充実 で 最高 2 倍 (FM づ 比 ) 
の 高速 描画 。 借 シン セ サ イ ザ LSI 内 蔵 。8 オ クタ ー プ ・ 
三重 和音 の サウ ンド 機能 。 電 8 イン チ 1MB/ ド ライ 7 
の 大 容量 ファ イレ を サポ ー ト 。 ※ 上 記 は FM ブ 7L4 の 特長 で す 。 


3. 5 イン チ 時 代 の 400 ラ イン パソ コン 


ҒМ-7714. 


エル ソン オー 


Ж 2 38, 0 20 isa FM Logo 付 ) 


すぐ れ た コス TRL: REVI 


Ұ99,800 ян) x 
lod ソフ ト は 定評 ある F M-7 と 完全 互換 、 
し か も 数 か ず の 卓越 し た 機能 を すべ て 継承 し まし た 。 


ニュ ー セ ブン 


マイ コン スカ イラ ブ プ : FM シリ ー ズ の ハー ド か ら ソ フト まで 一 挙 に 展示 実演 、 あ な た の パソ コン の コン サル タン ト と し て ご 活用 くだ さい 。 @ 東 京 ・ 刀 の 内 (03)215-2392 東京 ・ 秋 葉 原 (03)251-1448 札幌 < 時 計 台 ビル > 
(011)222-5476< 丸 井 今井 >(011)241- -4185 @ 仙 台 (0222)66-8711 名 古屋 < 第 2 アメ 横 ビ ピル >(052)251- -7231@ 大 阪 (06)344-7628/341-0486 ө/ 5 (082) 247-3949 € 福岡 く 開設 準 備 室 〉(092)471-7203 

富士 通 株 式 会 社 @ 半 導体 統轄 営業 部 (03)216- 3211 北海 道 支店 (011)271-4311 東北 支店 (0222)64-2131 金沢 支店 (0762)63-7621 長野 支店 (0262)26-8222  ew 静 岡 支店 (0542)54-9131 
@ 名 古屋 支店 (052)201- -8611 @ 大 阪 支店 (06)344-1101 広島 支店 (082)221-2288 @ 高 松 支 店 (0878)51-8167 ө 九州 支 店 (092)411-6311 e 沖縄 支店 (0988)66-0655 
LE ЕЕ TH VETAT кыайа OMS くだ さい 。 お 問い 合わ せ は ー 富士通 サ プ ライ 株 式 会 社 容 (03)434-0141 


MS А о た ー 7 / ハイ ドラ イド 


HE ba aca 
pan 2) ロー ルプ レイ ング ゲー ム の キャ ラク ター を 成長 させ る 楽し さと 
③ ア ド ベ ンチ ャ ー ゲ ー ム の 秘密 捜し の 面白 さ を 融合 


支 画 面 瞬 時 切り 替え (X-1 は 四方 向 ス クロ ー ル ) <ееееее-- 無論 / 
支 64K フ ル メ モリ ー、 オー ル マ シ ン 語 өе еја еее RE sts ваде 016 VITE ааа каје 勿論 / 
леан Б... 当然 / 


友 さら に 加え て 、 華 謀 な グラ フィ ックス と 高度 な 重ね 合わ せ 処 理 に よる 立 
体 画面 。 水 に 没 し 、 木 に か くれ 、 な め ら か に 動く キャ ラク ター は 、 広大 な 
マッ プ 上 を 駆け 巡り ます 。 


MSX(32K) テー ブフ h8 14,800 
4 月 下旬 発売 
下旬 FM-7/NEW7/77 9: Ол Y6,800 


—7 hR14,800 

PC-600Imk II /6601/SR с: =R Y4,800 

PC-6601 専用 өлара аны ойыс 3.5" IDAR 6,800 

PC-6601SR 専用 s saa aa s sa UT 3.5" IDDRR 6.800 

pepe РС-8801 /mkIL/SR ХІ TURBO ーー 5FD 版 Y6,800 

cum 112 XI/C/TURBO — 5FD 版 \6.800 テー プ 版 \4.800 

PC-8801、FM-7 

^I: pa в ша. ҮШ! і 
FH 6001 mk TF ДЖ, 1% ЖҰ; J T . だ が " | š 1 ] n J 
po Жа жа” мне DU че 

PE 6001mk II 版 ESR 版 と は それ ぞ れ の モー ド で 別個 の プロ グラ ム を 開発 

和幸 虹 し まし に 。mkII 版 の 方 、「 テ ラ 4001」「 ス ー パ ー グ ラフ ィ ッ クエ ディ ター」 


で お な じみ の 高速 ペイ ント ルー チン を 使用 し て な り ま す の で 、 画面 表示 も 

餅 速 に な っ て いま す 。 ま た 、 マ ニュ アル に は ゴル フ 用 語 や ルー ル の 解説 等 

を 付け 加え まし た の で 、 ゴ ルフ を まっ た 〈 知 ら な い 方 に も 十分 に ぉ 楽し みい た 

だけ ます 。 

⑧4 人 同時 プレ イ 可 能 朝 入力 ミス の キャ ン セ ルル 機能 付 狼 ボール 確 認 

© PC-6001mkII テ ー プ 版 、PC-6001mkIISR テ ー プ 版 、 日 立 S1 
テー プ 版 MZ-1500QD 版 各 \4.000 

Ф PC-6601 専 用 3.5 1D 版 、PC-6601SR 専 用 3.5'1DD 版 、FM-77 
3.5 FD 版 、PC-9801F5'2DD 版 、IBM-JX3.5'2DD 版 各 \6.800 


PC-6001mkII SR 


ННІ ЕЗ > I^. 


.ИЛЕЕОХИОЯФ/ ә 
ビエ エー A Ш +=, 


文 新開 発 の 高速 3-D ビ ピクチャ ー エ ディタ ー 文 画面 数 、 コ マン ド 、 会 話 数 も 大 幅 ア ッ プ 
中 間 色 を 含む 1 枚 の 画面 を 、3 次 元 的 に 回 転 き せ た り 、 支 リ アル タイ ムシ ー ン は 、 ワ イヤ ー フ レー ム に よる 高速 リア 
拡大 ・ 縮 小さき せ て 描き 、 さ きら に 、 描 いた 何 枚 か の 画面 を ル タ イ ム 3-D シ ミュ レー ター (残念 な が ら 、 ス トー リー の 


自由 に 組み 合わ せ て お り ま す 。 展開 上 内 容 は 公開 で きま せん 。) 

支 画面 を 切り 変え る た びに 居場所 が 変わ っ て いく キャ ラ 支 ロ ー ル プレ イン グ ゲ ー ム の 要素 も 加え 、 シ ー ン 1( カ セッ 
クタ ー ト 1) だ け で も 60 以 上 の 地区 (画面 ) を 自由 に 移動 で きま まあ 
1 枚 の 画面 は 、 何 枚 か の 背景 өзү 面 と キャ ラク ター の | 注 PC-6601mkII/6601 版 は 、3-D ピ クチ ャ ー エ ディ ター は 
画面 と の 組み 合わ せ に な っ て いて 、 ゲ ー ム 進行 の 条件 使用 に て いま せん が 、 新 開発 の 高速 グラ フィ ッ ク エ ディ タ 
に 合わ せ て 、 そ の つど 、 背 景 県 し キャ ラク ター の 組み 人 + わ せ ー に より 、 一 画面 表示 は 暗黒 星雲 の 倍 の スピ ー ド に 
を 変え て 描き ます 。 な っ て いま す 3-D シ ミュ レー ター は 疑似 3-D と な っ て 


支 登場 人 物 、 お 馴 み の キャ ラク ター は も ちろ ん 、 全 20 キ ャ お り ま す 
ラク ター 以上 が 登場 


9 FM- 7//NEW 77 7 テー プ 版 \4.800、5FD 版 \ ぎ 6.800、3.5FD 版 \6.800 
6 PC-6601 専 用 3.5 1D 版 \6.800 Ө PC-6601SR3& FH3.5' 1 DDR ¥ 6,800 
9 PC-6001mkII/6601/SR テ ー プ 版 \4.800 


叶う) 所 ユー オデ ーー ズ フ ラプ 
REDE, / 応募 要項 は !/O4 月 号 、T&E マ ガ ジ ン NO.5 に て 


ゲー ム フ リ ー ク と ゲー ム デ ザイ ナー の 接点 を 作り ます 。 


T&E マガ ツン NO0.5 発行 中 / 


廊 全 キャ ラク ター は |5 種 以上 廊 ゲ ー ム 途中 で の デー タ セ ー ブ ロ ー ド 可能 
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B PC-600 シ リー ズ コパ バ パー マイ ン (200 ボ ー) 
JR-100 CHIP CHAP 
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FM-7 


Ш u 回 FM- pa 


TE АҢЫ ーー ニン ーー 
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FM-'7 
シリ ー ズ 


過酷 な ラリ ー に 挑め / 
コー ス は も ちろ ん 操作 キー, 車 の 
МЕ, 制限 時 間 ま で 設定 で きる 本 
格 ラ リー キッ ト . スピ ー ド は ピカ 
イチ 砂漠, サバ ン ナ , 大 河 の 大 鉄 
№, 恐怖 の 交差 点 を 激走 ノ 


AA 


3 


TIME 
225 


SCORE 


MZ -1500 版 


か ら 郊 外 へ と , 


ҒМ-'7 シリー ズ 


バ パソ コン の 操る 個性 を 持っ た 5 人 
の ライ ダー と あな た が 激しい デ ッ 
ド ・ ヒ ー ト を 展開 , 初 の 3D バ イク ・ 
mw ええ. / RI =p oTe 
に 猛烈 に ダッ シュ , 急 カ ー ブ を イ 
ン で 入り バイ ク を 傾け ハン グ ・ オ 
ン . ノ レー ス ・ リ ー ダ ー は 君 だ , ノ 


マグ シッ ー ェ 


太字 2 フタ ーー ゲー 


J5 で ライ バル を 抜け / 

ター ボ ・ オ ン // 最 高速 度 が 300km/h 
に 加速 ./90 秒 以内 に ライ バル 車 を 
一 定数 抜く 3D レー シン グ . へ アピ 
ン ・ カ ー プ や アイ ス ・ バ バーン. JSD 
シン ブル 操作 が 走る 興奮 を 呼ぶ . ノ 


. П/-1500, PC8OOI / ткі /PC880I/mk п-вдвс+—к) 


E 新た な スカ イラ イン 伝説 が 静か に 走り 出す / 


精彩 な 3 D 画 像 を 高速 処理 に より 
驚く ほど と 美しく, スリ ル あ る " レ 
ー ス が 展開 する 「 走 れ . ノ スカ イラ 
イン 」MZ-1500 版 完成 ./PC 版 の 
高速 性 を 継承 し つつ , さら に 鮮 や 
か な 画像 に グレ ー ド ・ ア ッ プ / ノ 人造 
か 彼方 に 連なる 山脈 と 路側 帯 の 樹 
е. 背景 に 連動 し た サウ ンド . 都 会 
ドラ マチ ッ ク な 走 
り に 風 を 感じ る ./MZ 版 


超 高 速 3D F 
君 は 平行 感覚 に 自信 ある か ? 今 ま 
で の フラ イト ・ シミ ュ レ ーション で は 
体験 で き な か っ た “まさ に 沙 ち て 
いく ”^ 急降下 感 が プレ イヤ ー の 全 
身 を 包む 超 高 速 3 D フ ライ ト ZB 
眼 状 の 都市 上 空 を 飛行 し , 標的 の 
敵 移動 要塞 に ミサ イル の 照準 を 合 
わせ 発射 する ./ 鋭 い 平行 感覚 が 標 
的 を 破壊 し , さら に 未知 の フラ イ 
ト へ と 誘う . ノ 


36 エ リア も の 広大 な 戦域 を 飛べ ./ 
主翼 を 変形 し 低空 ・ 上 空 飛 行 す る 
戦闘 機 . デル フィ ス を 越え た 高速 
戦 が 一 大 パノラマ て 飛翔 する . 


JV. EKE 
本 格 3D フ ライ ト ・ シ ミュ レー ショ 
ン の 賞 讃 と 共に , 次 々 と 移植 が 成 JM. а. ИМ е : 7 
КЕЕШ Ш ЕШ E 7 -— d 


土 を 飛び 回 る . PC-9801 版 
MISCORE の の 77 の 777 SCORE 000045004 | Wh GNUR 
zT 


д "беке 


£ 
+ 


"ow ж w э wt Om а w w жк окт 


d - 4 ž 
T še i 


へ さ // シ リー ズ ( 要 JS) Шан | 
a n IN 
r ІШЕ % "А è н Bu" ; "d | | : 
Sis Ж yn P; ы | : | | | 
нш), ジャ ンプ する ホバー 戦 


k. 
+. 高く 飛び 上 が る に は 膝 を 曲げ 思 NISSTLE, 


i жк ш акш эш шош жш шшш 


% 


いき り 地 を 蹴る ノ 飛 び 上 が っ た 勢い ^ dum 
C, さら に 上 へ 飛び 飛行 方 向 まで ass 
も 変え られ る . BEP КЕЛА 
と の 合体 ・ 離 脱 を 繰り 返し て 進攻 
する 戦士 は , 壮絶 な 戦闘 に 勝ち メ 
イン 基地 を 目指 す .JS と テン ・ キ 
ー の ダブ ル 操 作 を 駆使 し 戦士 よ 飛 


ベ ノ 


85822223523323212322322522 M 
FE i E まま 1 まま は ます ょ まま すま まま そま すす まま - 

Eusranunpassnarsunnsununu E 

` muxnasirannacsusñausnunu 
жати и? кінввввивкикиян ; 


リリ コック ビット 


ECROSS MEDIA 


94 dv RT 


аг” 
94: 


“се 


Уә 


NF 


る @ PC シリ ー ズ も 加わ っ て 、 人 気 上 昇 中 / た の し い 出 逢い 、 お か し な 出逢い 、 こ わい 出逢い 。 人 生 に は 、 き ま ざ ま な 出逢い が 


ба で る か 。 そ れ は 天国 と 地獄 ほど ちがう 。 こ れ は 、 運 で は な い の だ 。 ど うし て も か ぐ や 尋 


に 逢い た い の な ら 、 べし 。 き っ 、 は か な う よ 。 
FM- Z/C s oS ; Vs L BOUM 33254 
J PC-880l/m«IL/ mullsn Ои ОЙ 


@ ディ スク 版 5 イン チ /3.5 イ ンチ 各 2 枚 組 段位 認定 証 プ レ ゼ ント / 


し < & ҰЗ,800 スコ ア 表 示 面 を セー プ し 、 あ な た の 住所 、 氏 名 、 年 令 、 性 別 、 セ ー プ 名 、 電 話 番号 (必ず ) を 明記 の うえ 、 下 記 あ て 先 

<< QX1-7U—Z.PC-98007'— X.PC-6601 SR. まで お 送り くだ さい 。 認 定 証 の 他 に も 数 々 の プレ ゼン ト が あり ます 。 段 位 獲得 者 に は 、 ご 希望 に より 性 格 分 析 を いた 

IBM-JX を お 持ち の 方 、 も うし ば らく お 待ち くだ さい し ます 。 

た だ いま 移植 中 で す ӨЗІ 〒150 東京 都 渋谷 区 渋谷 |-7-5 青 山 セ ブン ハイ ツ 605 ビク ター 音楽 産業 株 式 会 社 PS 制作 部 
101 ⑧ お 問 合 わ せ は 7%03-486-9470 


| inê qum ある けれ ど 、 新 竹 取 物語 」 に は 、 ま ば ゆい 出逢い が ある 。 で も 、 苦労 し て た どり つい 
Ф чаш А ЗА й 722. た か ら 6 と いっ て 、 ト ー ゼ ン 美 人 の か ぐ や 姫 が 出 て くる と 決め こん で いる の な ら 、 そ れ は 
Жж (6%, 2 あき ら か に アマ イ の だ 。 ブ 厚い くも ちび る の ブス 姫 が で る か 、 あ こ が れ の か ぐ や 姫 が が 


ン S 


る パン コン ソフ ト の お 求め は 、 有 名 パソ コン ショ ッ プ て :/ お 近く で 、 お 求め に な れ な い 場合 は 、 商 品名 ・ 使 用 機種 名 記入 の 上 、 代 金 と 送料 (500 円 ) を 現金 書留 に て 、 下 記 まで 直接 お 申し 込み 下さ い 
〒107 東京 都 港 区 北青山 3-6-18( 共 同 ビル 青山 2F ) 日 本 エイ ・ ブ イ ・ シ ー 株 式 会 社 10 1F 信販 売店 を 募集 に て いま す 。 販売 に 関す る お 問合せ は 、 日 本 エイ ・ プ イ ・ シ ー 株 式 会 社 企画 部 まで 103-486-4121 


発売 / ビ クタ ー 音 楽 産業 株 式 会 社 る 販売 日 本 エイ ・ ブ イ ・ シ ー 株 式 会 社 


ワウ イッ キー 君 こ こも に 、 金メダル を 目 ざ せ / 


Dus ln Gana a kaa タン ダー ド の アデ アー ケー ド ・ が ゲーム 4 パタ ー ン を 集め た 大 全集 ./ 


ARCADE 動 記録 機能 つき ON 
OLYMPICS| eem 979 777277 
エビ バア 、 タ コパ が 、 ウ ミウ シゲ だ > 海底 で ぐり ひろげ ある 大 自然 シェー テ ィング ゲー ム 。 
め ⑳ コ プラ ・ ハ ンタ ー 
F'M-'"7Z/NW'Z/"7"7 和 恐ろしい コブ グラ は 、 落 し 究 へ き そ い 込 も 5 う 。 リ ン ゴ を うま く 利 用 し て 、 作 戦 を た て よう 。 
@ カ セッ ト 版 2 本 組 ・2 種 類 ЖҰЗ, 800 ロー ンズ ・ バ ヾ ニック 
| . 大 都会 編 (モン キー・ イ ン フ ェ ル ノ 、 ロ ー ン ズ ・ パ ニッ ク ) 
2. 大 自然 編 ( コ ブラ ・ ・ ハ ンタ ー、 マ リー ン ・ ア タッ ク ) サラ 金 ヤ ク ザ に 追わ れる ウイ ッ キ ー Æ. お お金 を だ DID DES FCI 逃げ られ る か カ >。 
МӨ 800 5 イン チ / 3.5 イ ンチ ⑳ モンキー・ イ ン フ ェ ル ノ 
4 ビル の 火災 に あっ た / さあ 大 変 ./ 消 火器 で 火 を 消し な が ら 、 ヘ リコ フ プター で 
近日 発売 
PC-880l/mull / mullsn DS 


ミュ ー ジ シャ ン も びっ くり / 
日 本 初 の PSG の 限界 に 挑戦 し た 音楽 の ワー ブロ 。 


上 ルミ ュー ジッ ク ・ エ ディ ター 


音楽 の ワー プロ 


IUS TUM; 


ІРІЛІГІ カー ソン ルレ キー で 、 デ ィ ス プア レイ 上 の 五線譜 に 、 音 と 、 目 で 確認 し な が ら 作 品 を つく ニュ ー ジ プ ム ム | 
nid, 三 音 独 立 し て 、 エ ン ペ ロー フー パタ ー ン を 変化 きせ る こと が で きま す 。  ҒИМ-/Т/МИ!7//777 
@ デモ 作品 : スク ラッ チ の リズ ム を 使っ た デイ スコ チュ ー ン リズ ミッ ク な ロッ クン ロ @ カ セッ ト 版 2 本 組 Ұ6,800 
ー ル な ど 多 数 ⑯ デ ィ ス ク 版 5 イン チ /3.5 イ ンチ ЯҰВ,800 
2 Ауд 94%. 2OMUSIUMTO74 —* JO & 2 177 )7— 
07774»2-7v4v— ショ ン が 発売 され ます 。 ご 期待 くだ さい 。 
美しい 宇宙 船 の ュ コン ン ソール 風 な 画面 の 中 で 、32 パ ター ン の イン ジ ケ ー タ ー か が ドリ suan s 現在 開発 中 . ノ 
アル ・ タ イム で 動き ます 左右 は 音 の 高き 、 上 下 は 音 の 大 きき に 対応 し ます у A ыы ада на 


@ シン グル ・ フ "レイ 、 ジュ ー ク < ックス 、 オー ト ・ ブ "レイ な どの 演奏 モー ド が あり O ミ ュー ジア ム 1 用 プリ ント アウ ト ユ ー テ ィ リ ティ (作曲 し た 音 
符 や エン ベロ ー プ パタ ー ン ダン プリ スト 等 が フリ ント アウ 


ます 。 (デイ スク 版 ) ト で きる /) 近日 発売 


まさ に ライ ブス テー< ジン 感 覚 の お も し ろ シ ン セ 。 


Su er S nt Q キー ボー ド が を その まま シン セ サ イ ザー に 早変わり 。8 パ ター ン の シン モモ ー ド に 
D y より 、 自 由 自 在 な サウ ンド ・ ミ ックス が 可能 。 エ コー も ビブ ラー ト も か か * る 。 デイ スト 


DO EM-'"7Z/WuW"Z 77 


スー バー・ シ ン セ ーション ・ サ ウン ド も ば っ ちり 出せ る 。 

5416K 日 対応 ファ ンク ショ ン ・ キ ー に それ ぞ れ サウ ンド を 登録 で きる プリセット 機 能 搭載 。 演 奏 
3x35,800(9 7:727) 中 で も 、 瞬 時 に 10 種 類 の 音色 変更 が 可能 。 

* FM-TANCT/UPT NS 近日 発売 メト ロ ノ ー ム (ガイ ド テ ン ポ ) に 合わ せ た 演 奏 を メモ リー に 記憶 。 テ ン ポ 、 音 色 を 


機能 も 拡張 し ま し た 。 


変え て 再生 が で きる 録音 、 再 生 機 能 内 蔵 。 
⑳ デ ー タ レコ ュー ダ を セ モット すれ ば 、 音 色 、 曲 や カセ モット に 登録 する こと も OK。 
自分 が 今 弾い た 曲 の プリ ント ・ ア ウト も すぐ に で きる の だ 。 


対局 ・ 定 石 ・ 問 題 を ディ スプ レイ 上 の 碁盤 で シミ ュ レ ーション し な が ら 学 べべ る ソフ ト 
で すま メキ メキ 実力 が アッ プ し ます 。 
@ 名 対局 が 見 られ る ./ 対局 デー タ 第 22 期 十 段 戦 ・ 第 37 期 本 因 坊 戦 を 収録 


( 約 100 局 を 収録 可能 ・ デ ィ スク 版 ) € (СП to SHODAN) = 


| | Ul  ФЖЖЖЕЛУ»ЯТС>/ 。 ツケ ノビ 、 ケ イマ 等 の 基本 定石 か ら 現 代 の 星 の 戦術 ま 
пис n で 収録 ( 約 600 例 を 収録 可能 ・ デ ィ ス ク 版 ) FM А 
ФЬ, за JEAN moo РС-8801/ ткі тк 
@ 収録 デー タ の 説明 と し て 小林 光一 十 段 監修 ・ 堀 田 五 番 士 構成 ・116 ペ ー ジ FM-T/MT/TT %8 800 
KEROS Mar 


@ カセット 版 
AA 234 ғм-7/ж7/77  X6,800 


1»SCORPION 


/4 — y—svw F n 
A ADOLFS OPTIONS 


N \ 
2%; F) IGHT SPELL RUN 


> 
ән өн ее С) 


ARAC TER NAME 


18 


ШЕНІ 


мыт) 
ч. o 


z 
“Мо 


| Барраро 


| 


ВОАСК Р›А55 


| ビ 上 は に ビ は は NO の 
| 


交 忌 の 地 ブ リーノ フック を 突如 と し て 環 つ だ 数 々 の 異変 。 そ れ は 闇 の 司祭 アル ガル ド の 
索 魔 に よる も の で あつ だ 。 愛 する ブリー ノン ッ ク に 平和 を 取り 戻す べ ご 神託 を 受け だ 長 
ER マ の 求め に 応じ て 集 ま つ だ 20 名 の 勇 土 …… ° 
PC-8801(mkII) T. 480009, D. 7800F3 


名 、 ア メリ カ で 最も 人 気 が あ り 、 ゲ グー/、 
の 主流 で ある ロー ルプ レイ ンプ ゲー ム 。 
(ゲー ム 進 行 も 比較 的 シン プル だ し 、 ス ト 
ー リ ー も 日 本 人 に と つて 理解 し や すい の 
で ロー ルプ レー イン ブ プ ゲーム 入 門 に 最適 
JC Ys. г 


T、5200 円 (プレ イヤ ー ズ テー ブ 付 ) 
PC8001(mk 11).8801( тк 11) F MCN 
EW)7. D 5". 7800] PC8801(m 
k ll). FM(N E W)7 D3.5".-7800 
円 、F M77、 


この ソフ ト は スゴ イ 。 ち ゃ ん と 守備 で は 
前 進 、 定 位置 の 切り 換え が で きる し 、 バ 
ント シフ ト も と れる 、 ご これ は 秘密 だ けど 
すご い 魔 球 も 。 こ の ペナ ント レー ス を や 
ら ざ し て 野球 ゲー ム は 語れ な い /「 テ フ 
ン ポ リス 」 より の 


T、4.500 円 PC6001mk II /SR.8001(mk II 


2.8801(тк 1)、F M(NEWOZ7.X1(C) 
D 5". 6,800Hj P PC6001mk 11,8001(m 
k Il )、8801(mk 112,98014 E) Е, F M(N 
EWJ7 - TCAD + E X). X4 LI J— 
(7,8003 P C9801M2) 

D3.5”. 680011 PC6601- SR. F M77 
ОЗ”, 680003 x 1 D 


時 は 199 X 年 。 東 京 で は 孤独 な 独身 男 が 謎 の 死 を 送 げ る 事件 が 


タイ リョ ク 
sex 
LI. 
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ひよ つと し た だら この ゲー ム は ン ル マ に 師 
われ る 我々 現代 人 へ の 作者 の 強烈 文明 
批判 で は な い ガ と いう 気 さ え し て こる 。 
プラ フィ ッ ク や 様々 な アイ ディ アワ で 充分 
Т ノン ト 「 カ ー ソ ル , 
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多発 し て いた 。 異 例 な 事件 の だ め 警 視 庁 で は 特別 捜査 網 を し 
き 解 明 に あ た つ だ が 、 何 の 掛り も 得 ら れ な か つた だ 。 そ ん な 
ある 日 、 私 立 探 偵 で ある あな だ に 不思議 な 依頼 が 持ち 込ま れ 
だ 。「3 日 以内 に ダッ チワ イフ MGS, FRED CR 
UL あな だ は 恋人 サチ コ と の 結婚 を 控え 、 お 金 も 必 要 で あ 
つた だ め 、 や お な ご ぐ そ の 依頼 を 引き 受け だ 。 BO, RRO 
ж 7743370, に あな た の 姿 は あつ だ た 。 
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テレ ビ 、 新 聞 、 雑 誌 に と これ程 話題 に 上 
つ だ ソフ ト に は 、 か が つて な が ご だ な 、 界 に 
類 を 見 な い ア ダル ト の 世界 А 
祝い に も ば ひど ご どうぞ / 
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FR 755,55 


あな だ の 思考 と 指先 は トイ 252827)? 
これ も 一 種 の ロー ルプ レイ (RP) ガ な や 
思考 型 迷路 ゲー へ 数 ある 中 で 、 ト イレ ツ ト ベ ペー パー を ころ が し 道 を 作る 、 な ご ど と いう 


バカ げ だ ソフ ト が あつ だ だ ろう か ゃ 随所 に ちり ば め だ パ ズル 的 お 仕掛 け を 突破 し 、 

お 邪魔 軍団 の ウチ こん 達 の 妨害 を 避け つつ 彼女 の 家 ま で ひだ 走り 。 あ な た の 武器 は 、 
ベー パー と 明 せ き な 頭 脳 だ け 。 思 考 型 アフ ショ ン ゲ ー ム の 決定 版 メ 
PC8801(mk Ill) 用 СО 580064 T3800 円 ) 


ほとん ど ビ ョ ー キ 、 で は な く 本 当 に 病気 の ソフ ト 
注 …… ご の ソフ ト を 見 だ 人 は 、 お 医者 さん に な ら な いで 下さ きい 。 
ウ ワ ー ン !! つい に 出 だ よ お -_ - 、 ボ ク 等 は こん な ソフ ト を 待つ て い だ ん だ / | 
全国 6000 万 人 の お 医者 さん ご っ こ ご フ ァ ン の 皆さん を 狂喜 させ だ ロリ コン ゲー ム ' マイ | 
. ロリータ ,。 あ な だ の 微妙 な 指 使い が 、 少 女 だ た ち を 魔 病 か ら 救 う 。" 先 生 、 お な が が | 
Elid KU Сю. Z2 07 ао 213. ああ 素晴らし き 世 紀 未 。 | 
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| EE T 380083 Т 38003 T 3800 円 
rJADJUE DN ! ジャ イラ ス で す !! | 君 は フリ ス を 知 つ て いる か 苦し み | 料理 嫌い の 僕 も 、 だ まね ぎ 嫌 い の 私 | 全国 4000 万 人 (? マ ) の 花札 ファ ン の 朗 
_ ゴ ル サ レ ム 帝 国 を 震 幅 させ だ 男 の 仮 の どん 底 に あえ ぐ 人 々 を 救う と いう も 、 対 で も お いし こく 追 べ る ゲー ム つ | S" тотен Ж FEE 
_ 説 を プラ フィ カル に ゲー ム 1 化 ! 6024 難し い 使 命 を 背負 い 、 今 日 も いばら て 知っ て る マ 、 そ う 、 そ れ は 噂 の 、 っ こい, 待望 の 新 発 売 。 そ れ ! 四 光 だ 、 
_ 上 の バリ エー ショ ング が 、 無敵 の 3 一 の 道 を 歩 な フリ ス 。 感 動 の 精神 世界 ゲ 「 フ ツキ ン ・ カ レー」 石光 だ 、 Wu ! ーー 札 ガ 飛び か 
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e 新宿 の 定 を さま よ つ て いる 内 に 、 突 如 GAME OVER! 
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世界 初 の 
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Ф LOOK NAVKO ~ КЕ ウツ フシ イヒ ト デ ス 。 
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IO で は , 読者 の 皆様 の ご 要望 に 応え て , 3 月 18 日 か ら パ ソコ ン ・ ネ ットワーク [TeleStar( テ レス ター)] の 実験 を 開始 し まし た . 
パソ ンコ ン ・ ネ ットワーク に つい て は , 各地 の クラ ブ や 出版 社 で 実験 が 行なわ れ て お り , それぞれ 注目 すべ き 成 果 を あげ て いま す 
2, PiO で も 読者 の 皆様 の 協力 を 得 て , で きる だ け 多 く の 機 種 の 方 が パソ コン ・ ネ ットワーク を 利用 で きる よう に し て いき だ たい 
と 考え て いま す . 多 数 の 読者 の 皆様 の 参加 を お 待ち し て いま す . 


ご 協力 を お 願い いた し ます . 


以下 に , TeleStar で 子 定 さ れ て いる 実験 内 容 を 示し ます . TeleStar は , & 2 に 挙げ た マシ ン だ け で な く , 表 3 に ある マ 
これ は 固定 的 な も の で は な く , 参加 者 の 皆様 の ご 協力 に よ ン ン に ガ し て も 完 馬 を 行ない た いと 考え て いま す 。 し か し , 
D, 随時 拡張 ・ 改 良 を 行なっ て いき た いと 考え て いま す . 現在 の と ころ , ター ミナ ル ・ プ ログ ラム は まだ すべ て の 機 

種 に は 対応 し て いま せん . 読者 の 皆様 の ご 協力 を お 願い い 


Жі 現在 予定 され て いる 実験 内 容 
ALES. 


BBS (電子 掲示 板 シ ステ ム ) 


EXE RONMBNMESNN I 
I/O 編 集 部 か ら の 連絡 O 2 СУРЕ: 8 ビット 
PiO 編 集 部 か ら の 連絡 バリ ティ な し 
О ОА И РС 
通信 速度 : 300 ボ ー 全 2 重 (将来 的 に は 1.200 ボ ー 半 2 重 も 子 
定 し て いま す ) 
漢字 コー ド : シフ ト TJIS 
Xon/ Xoff : あり 


TV 番組 情報 
映画 情報 


(ANK と は , アル ファ ベッ ト ・ 数 字 ・ カ タカ ナ を 指す ) 


@RS-232C イ ンタ ー フ ェ イ ス の 内 蔵 さ れ た パソ コン : 洪 字 


PECORI DEI 12, 表示 は ANK 女 字 ( ア ルフ ァ ベ ッ ト ・ ROM (JIS 第 1 水準 ) と 漢字 表示 を サポ ー ト し た ター ミナ 
数 字 ・ カ タカ ナ ) と 漢字 で 行なわ れ ま す . 当面 は , ANK 文 字 ル ィ プロ の ウム が あれ ぼぼ より よい 、 
に 対応 し た ター ミナ ル ・ プ ログ ラム を 。 で きる だ け 多 く の Өш: 音響 カプ ラ を 継ぐ 場合 は , 電 々 公社 の 普及 型 と 同 
マシ ン で 作動 させ , TeleStar 上 で 相互 に メッ セー ジ を 交換 で 型 の 受話 器 を 持っ た も の . モデ ム 電 話 な ら 音 響 カ プラ は 
жь УОЛА СУУ УРУН, ЖЕНИ, А, 不要 . 
商学 に よる コミ ュ ニ ケー と ショ と で すこ の 点 に 関し ん て も RQ @ メ ヌル モデ ム ・ ケ ーー プル : パソ コン と カプ ラ を 継ぐ ケー プ 
も も ちろ ん 開発 の 努力 を し ます が , 読者 の 皆様 の 絶大 な る JL. I/ 〇 より ぎ 4.000 で 実費 販売 . た だ し , RS-232C イ ンタ 


X 発表 済み の ANK タ ー ミ ナル ・ プ ログ ラム 


ШӘ n вне ЕТЕ ЖІГІ 050 馬 NN ター フル 
+ | muna | —  — — — -S3Z45»2i3W | 
CELZSULIJICUREPIPIUEER 
ШАБ T RRO. | —  — — —Losm o NR 
横田 秀次 郎 //0 エ ンジ ン ル - ム EP 1 ы 


(以上 の プロ グラ ム は , フロ ッ ピ ー デ ィ ス ク ・ ド ライ プ , 音響 カプ ラ が 必要 ) * 漢 字 に も 対応 


パソ ンコ ジン ネットワーク 


TeleSta 


з 現在 の 状況 (へ は オプ ショ ン ) 


SI 
L3 

L3MARK2/5 
PC-4801/mkII/SR 
PC-8001 
PC-8001mk II 
PC-8001mkIISR 
PC-6601 
PC6601SR 
PC-6001mk II 
PC-6001mkIISR 
PC-6001 
PC-9801 

FM4 
FM-1/NEWI 
FM 

FM-11BS 
FM-11AD2 
FM-16 8 
Xiturbo 

X1( そ の 他 ) 
MZ-1500 
MZ-2000/2200 
М2-0В 
MZ-6500/5500 


O 
BE 


) 


ーーーーーーーーーー | 
аланы лынады) 


XI! QD Lu OG) Xm 


Боз т экы шш ше тш юэ юш итш 
ыыы 


> 
Ж 


ーー フェイス に ケー プル が 付属 し て いる 場合 は 不要 . 
@ フ ロッ ピー ディ スク : アッ プロ ー ド , ダグ ダウンロー ド に は 。 
プ セ ゼロ ッ ヒ ピー ゲ ィ スタ が 必要 . 


一 実験 参加 申し 込み 方 法 一 


ере) 


3 M 
O O O i yg 
depromere 

a 


REF EE EE 


ФАТА : 参加 費 十 音響 カプ ラ 二 ケー ブル =\ ぎ 40,000 PASOPIA 
@OBRA : SINE + FED7 7 = Y 36, 000 PASOPIA 158Х 
eC 会 員 : 参加 費 = Y 6, 000 NUES ^ | o | 9 EE We 
А 一 C 会 員 に お 申し 込み の 方 は ,。 ハガキ に 住所 , КА, = の 表 は ,1/O で 調べ た も の で す が , 実際 と 異な っ て いる 場合 が あ 
年 齢 , 職業 , 使用 マシ ン , 希望 する 会 員 の 種別 (A 一 C) る か も し れ ま せん . その 場合 は 「 テ レス ター 係 」 ま で お 知ら せく 
を 書い て 下記 に お 申し 込み くだ さい . だ さい . 
жы, 特別 会 員 は 定員 に 達し まし だ . ご 協力 あり が と う ご 注 1 : S1 に は , RS-232C 用 イン ター フェ イス は 内 蔵 さ れ て いる が , 
Sus IL RS-232C 3 ж 2 4 (MP-9732, Moa, cnm 
注 2 : S1/10 以 外 の S1/20, 40 は 漢字 2 š 
"151 Meh n TET PALO EEE 注 3 : Poule cM TORTE пшн КО Ld 
(株 ) テ レス ター 注 4 : PC-6001mkII, PC-6601, PC-6601SR, PC-6001mkIISR は 当 
な お 。 NNR みつ きず フー ソバ アト かど オデ ジョ シッ 前 用 漢字 の ROM を 持ち , 中 で も PC-6001mkIISR, PC-6601SR は オ 
PT те 2 D wt NEP “ ; 
Қалық Басын шалына ы мл, овон Й ау. その 他 は 標 
書 」 送 付 時 に , 改め て ご 案内 し ます . 準 実装 . 
実験 期間 終了 後 の シ ステ ム の 本 格 稼動 の 場合 に は 「 参 加 費 」 注 6 : 漢字 ター ミナ ル ・ ソ フト \15.000 て 発売 . 


は 「 月 間 基 本 料 」 に 充当 し ます . 


ー ミ ナル ・ ブ プロ グラ ム の 通信 販売 
ぐー ミナ ルル * プ ログ タム を 以下 の 表 の よう な メデ ディア て 
通信 販売 し ます ( 各 \5.000: 送 料 込 ). 品番 , 商品 名 を 明記 し 
て 現金 書留 で お 送り くだ さい . どう ぞ ご 利用 くだ さい . m 
し 込み は 下記 を ご 覧 くだ さい . 


М/М-015К PC-8801 シ リー ズ , PC-9801/E 5 イン チ 2D 
yet 申し 込み 書 * WN-016K PC-9801F 54 F2DD 
@eIG つ tar U 
③ 代 金 払 い 込み TeleStar WF -017K FM-7/New7 5 イン チ 2D 


WF -018K FM -77 3.54 T 2D 


(《④ パ パスワード と 必要 な 機器 


WH -019K S1 モ デル 10/20 o4 > 2 
WH-020K S1 モ デル 30/40 5 イン チ 2HD 
WS -021K Xlturbo 54 +20 
WF -022K EMELE S FAD 


カプ ラ 仕 様 


使用 電話 機 600 形 電話 機 
通信 方 式 全 2 重 / 半 2 重 切り 換え 可 


ж EFI OXID 
申し 込み 先 : 15 東京 都 渋谷 区 代々 木 |-37-| ぜん らく ビル 
(株 ) コ ム パ ッ ク 「 エ キス パー ト ・ サ ービス 」 係 
( 注 ) で マニュアル な ど は 添付 され て いま せん の で , |/O 記 事 掲載 号 ( 3 月 号 ) を 
参考 に し て くだ さい 


通信 速度 300bps 

電 {р 電池 D.C4.8V( 約 4 時 間 JA C 100V 
外形 寸法 ( 高 さ , tg, 奥行 )72 メ 290X83mm 
E2 量 650g( 含 電池 ) 


S1 ク ラブ の 誕生 を 記念 し て , た だ 今 ら 1 を 

ぉ 求め の 方 は 無料 (実験 参加 費 1 年 分 免除 ) 

1 ラプ に 和信 会 で きる すす 

文 申し 込み 方 法 

「 お 客 様 登録 カー ド 」 に 必要 事項 を 記入 

DS}, 必ず 封書 に 入れ て も お送り くだ る 

ue; 

ご 注意 | ハガキ の まま 投 画 する と 申し 込み 受 
け 付 ける れ ま せん . 


КЕЛІ 
昭和 60 年 4 月 1 日 一 6 月 30 日 (当日 消印 
有効 ) 
文 申し 込み 先 
151 東京 都 渋谷 区 代々 木 1-37-1 
ぜん らく ビル 
(株 ) テ レス ター「S1 ク ラブ 」 係 


"Uis eiui =a (7 


マヤ ーー ンチ テ ュ ー フ 


マニ ア な ら 
走る こ 
ー ボ 搭載 の ワー ゲン K23. 7 


リー ハイ ウェ イ と いえ ば, 
アメ リカ が 世界 に 誇る アウ トバ ー ン . カー 


この 全長 25 マ イル の 直線 行路 を 
と を 夢見 る だ ろう . 愛車 は スー パー 
ー ボ の 発 


信 音 が ここ ちよ い . 


ж 


m, MAYACCYU РАСЕ 85 BASIC リ スト 


100 
110 
120 
150 
149 
150 
160 
170 
175 
180 


190 


200 


210 


240 


250 


260 
270 
280 


INT 
500 


510 


$ (32 


RESTORE 


error in DATA 1" 
220 PRINT "Wait for writing DATA 2":POKE 
$C806,1:FOR РС-%0408 TO $D4AF 1 
230 READ JR$:JRzVAL("S$"-JR$):POKE $C11F, 

JR:POKE PC,JR:MZzZMZ-*JR: NEXT 


; "SC"; SC; TABt 
290 LOCATE 0,3:COLOR 7,5,3:LOCATE 5,4:РК 


ニニ PiO イ ン フ ォ メ ーション 


CUTS 


コー ス が 曲っ て くれ れ ば … な ん て ミ 
ニ PiO で は 無理 な 注文 か な ? 


REM 9333 3€ 9€ 4€ 3€ Je 3e € € € € € € 9€ 3€ 9€ 9€ € ЗЕ 9€ 9€ 
REM * * 
REM ж MAYACCYU RACE ‘8S LI 
REM * * 
REM * by CyoJin-Game JUFC * 
REM * * 
REM 3333 Зе 3 9€ 9 € € € € 9€ ЗЕ € E 99€ 


REM 
CLEAR $1FFF 
POKE 0,0: СООК 7,0:РОКЕ %СА00,0:СІ 5: 


:ІҒ PEEK ($2000) =%86 THEN 260 


PRINT "Wait for writing DATA 1":POKE 
%С806,1:ҒОК PC-$2000 TO $2279 

READ ЈКФ: ЈК= МА ("Ф"+ЈКФ) : РОКЕ $C11F, 
JR: РОКЕ РС, ЈК: М2=М2+ЈК: NEXT 


IF MZ<>6@756 THEN ВЕЕР :PRINT 


: END 


IF М2<>77664 THEN BEEP :PRINT 


error in DATA 2":END 


POKE $C11F,0:PRINT "OK":FOR JR= の TO 


1000: NEXT 


HI-3000: TEMPO 50 

SC=0: CA=5: ТА=5@@:Р1 =1:МА=5 
CLS:LOCATE 1,1:PRINT 
25) 』 "CAR"; CA 


COLOR 2,5:LOCATE 24,7:PRINT "bà Мм"; 


LOCATE 9Q,9:COLOR 4,0,3 

COLOR 7,1:LOCATE 0,8:ҒОК JR= の TO 51: 

PRINT." 

520 LOCATE 0,9:ҒОК JR-1 TO 15:ҒОК FC-1 Т 

O 16-JR: COLOR 6,4:PRINT CHR$(149); 
550 FOR РС-1 TO 2*JR: COLOR 5,0:РКІМТ CHR 


"s: NEXT 
: NEXT 


) ssNEXT 


540 FOR FC=1 TO 16-JR: COLOR 6,4:PRINT CH 
КФ (149) ; : NEXT: NEXT 

350 ТА=500: Ма=5: РОКЕ %7000,%С5:РОКЕ $700 
1,98bE:POKE $7004,0: JR-USR ($2248) 

360 COLOR 5,0:1 ОСАТЕ 13,16:PRINT "READY! 
"sFUR ЕР=@ TO 1000: NEXT 

370 LOCATE 13,16:PRINT " 

580 COLOR 5,0:LOCATE 15,9:РКІМТ CHR$(129 


"INPUT 


"INPUT 


"HI"; HI; TAB (12) 


8,A۸64,00,81,83,264,26,86, 20,۸7,00,۸7 。 の 1 


プロ グラ ム 


RUN 直 後に マシ ン 語 と デー タ を 読み 
込み ます か が, も し 間違い が ある と エラ ー が 
ШЕТ. その と き は POKE $ 2000,02 íT 
な っ て か ら 入 力 し 直し て くだ る 


遊び 方 


Жо J imel], ギア ・ チ ェ ン 
lE. ^4. ロー の 区 別 は ター 


) *CHR$ (130) 

590 POKE $7002, ІМТ (RND (1) #3) :POKE $7005, 
ІМТ (RND (1) #2): FOR FM= の TO 10 

395 PICK JR:IF JR= う の THEN TA=1000:PL=10: 

NA=1 

396 IF JR= さ 1 THEN ТА=500: Рі =1 : МА=5 

400 JR-USR($2220):SOUND ТА,МА 
410 IF РЕЕК(%7004)<>0 THEN POKE 
GOTO 4:0 

420 SC=SC+PL: COLOR 7,0:LOCATE 14,1:PRINT 
SC:NEXT :GOTO 380 

430 SOUND 400,10:CA-CA-1:COLOR 7,0:LOCAT 
E 28,1:РКІМТ CA:IF СА<>@ THEN 520 

440 LOCATE 11,14:PRINT "GAME  OVER":LOCA 
TE 11,16іРКІМТ "HIT LRETJ" 

450 IF 5С>НІ THEN HI=SC 
460 PICK JRsIF JR 4513 
470 GOTO 270 

480 REM w*w*** DATA 1 жээ 


$7004 , 0: 


THEN 460 


490 DATA 86,81,07,1F,4C,57,20,29,86,81,A- 


7,20,4C,07,21,29,86,81,07,21,4C,07,22 
500 DATA 39,86,83,47,1F,4C,47,20,4C,47,2 
1,4C,07,2F,4C,07,40,4C,457,41,239,86,87 
510 DATA 47,20,4С,47,21,4С,47,22,4С,47,4 
2,4С,87,41,4С,47,42,59,86,82,47,21,4С 

20 DATA А7,22,4С, А7,25,4С,А7,41,4С,47,4 
2,4C, 4A7,42,39,86,89,07,1F,4C,47,20,A4C 
550 DATA А7,21,4С, ,87,22,4, A7 ,3F , AC ,A7,4 
0,4C,07,41,4C,57,42, 4C, A7, SF , AC, A7 , 60 
540 DATA 4C,A7,61, C. A7 52,39 , 85,89 ,47,2 
0,4C,57,21,4C,07,22,4C, 07,23, 4C, A7 ,40 
550 DATA 4C,47,41,4C, A7, 42,4С,А7,45,4С,А 
7,60,4C,07, бї, aC, 87 ,52,4C,A7,62,29, B6 
56 の DATA 89 87,21, 4C,4A7,22,4C,47,23,4C,A 
7,24,4С,А7,41,4С,А7,42,4С,А7,45,4С,А7 
572 DATA 44,4C 57 , 61, 4C 47,62, AC ,57 。6 さ 。4 
C,47,64,39,CE,C3,FF,46,00,81,89,26,722 
580 DATA 86,20,47,00,47,01,47,02,47,02,А 
7,20,47,21,47,22,4А7,22,47,40,4А7,41,А7 
590 DATA 42,07,42,B6,70,02,81,00,26,05,B 
D,20,54,20,0C,81,01,26,05,BD,20,7^,20 
500 DATA 03,BD,20,40,09,8C,C3,45,26,C2,C 


-E 。 じ さ 。 さ 8 。 6 。 の の 。 日 1 , 日 さ 。 26 。 1 D 日 6 。 29 。 7 。 の の 


610 DATA 47,01,07,02,07,20,57,21,07,22,B 


5,70,02,81,00,26,05,BD,20,54,20, 02 , BD 


620 DATA 20,7А,09,8С,С5,25,26,07,СЕ,С2,1 


ギア を ヘイ に まる もこ えび あたる ング が 難し い 


ボ 音 で 確認 し て くだ さい . 


P.S. 


ゲー ム 中 に 相手 の 車 の 一 部 が 残る こと が 
あり ます が 。 ゲー ム に は 支障 あり ませ ん . 


550 DATA A7,02,47,20,07,21,47,22,B6,70,0 
2,81,00,26,05,В0,20,18,20,0С,81,01,26 
540 DATA の 5。BD 。2 の 。 2C 。 29 。 の さ 。 BD 。 2 。 4 の 。 の 9 。 日 
С,С2,6С,26,СЕ,СЕ,С2,51,46,00,81,81,26 
550 DATA 15,86,20,87,00,А7,01,В6,70,05,8 
1,00,26,05,BD,20,18,20,02,BD,20,2C,09 
660 DATA 8C,C2,4D,26,DF ,CE,C2,2F ,56,00,8 
1,81,26,1E,85,20,07,00,07,01,B6,70,02 
570 DATA 81,00,25,05,Вр,20,00,20,0С,81,0 
1,26,05,В0,20,08,20,02,В0,20,10,29,А7 
680 DATA 20,07,21,47,22,07,23,A47,40,47,4 
1,07,42,07,42,67,60,47,61,47,62,07,63 
590 DATA 29,ҒЕ,70,00,646,20,81,20,25,20,А 
6,22,81,20,26,16,46,40,81,20,26,14,А6 
700 DATA 45,81,20,26,0Е,86,50,81,20,26,0. 
8,56,62,81,20,25,02,20,0B,85,01,B7,70 
710 DATA 04,86,ED,BD,21,B4,729,B5,00,01,8 
1,1C,25,0F,8C,C2,99,25,02,20,01,08,BD 
720 DATA 20,74,ҒҒ,70,00,29,81,10,26,Ғ5,8 
C,C3,83,25,07,ED,20,7A4,FF,70,00,29,09 
730 DATA 25,F6,FE,70,00,86,20,BD,21,B4,F 
F,70,05,B5,70,05,8B,04,B7,70,05,FE, 7 の 
740 DATA 05,86,05,BD,21,B4,BD,20,C6,BD,2 


1,CD,FE,70,00,FF,70,05,B6,70,05,8B,04 
750 DATA В7,70,05,ҒЕ,70,05,86,06,В0,21,В 
4,01,CE,D4,AF,A5,00,B7,70,0F 。 の 9 。Q6 。 の の 
750 DATA A7。 の 1 。BC 。D4 。 QB 。26 。F6 。 B6 。 7 の 。 の F ,A 
7 。 の の 。 さ 9 
765 REM 


4***** DATA 2 s 

770 DATA 05,04,04,0С,17,17,1Ғ,0%,С0,20,2 
Q,20,E8,E8,E8,60,00,00,01,01,07,1D,3C 
780 DATA 36。7E 。FF 。FF 。 日 1 , の の 。 の の 。FF ,E7,00,0 
0,80,80,EQ0,B8,5C,6C, 6B 。6B 。 さ 7 。 さ F 。 18, 1F 
790 DATA 09,05,42,В0,С2,Е7,7Е,00,ҒҒ,002,0 
ら 6。D6 EC 。FC 。 1 8 。 日 。 9 の 。 6 の 。 の の 。 の の 。 の の 。 の の , 9 の 
800 DATA 00,00,00,00,00,00,0F,1F ,28,60,C 
の , の 。 の の 。 の の 。 F の 。F 昌 。 1 じ 。 96 。 の 。 の の 。 の の 。 の の , の の 
810 DATA 00,00,00,980,01,01,01,0E, 1B。 さ 1 。 さ 
Ғ,21,80,С7,ЕҒ,Ғ8,75,В7,08,Е7,01,Е5,Ғ7 
820 DATA 17,CE,ED,1B,E7,80,80,80,70,D8,8 
C,FC,8C,3B,2F,19,1C,0F,07,04,03,F7,F8 
850 DATA FF,7F,10,FF,27,CO,EF, 1F 。FF 。FE 。 の 
B,FF,E4,03,DC,FC,98,38,F0,E0,20,CO, 05 
840 DATA АА,А8,5Ғ,50,АА,АА,ҒФ 
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2419) 


ミニ PiO ス クロ ー ル ゲー ム の 最高 峰 と 自 
ALTOS 「Tank」// Жо, きれ い , А 
力 5 分 の 三 拍子 そろ っ た 「Tank」./ 


Let's Play! 
衣 ミ ニ PIiO イ ン フ ォ メ ーション 


実行 する まで | リス ト ど お り に 入力 し て RUN. 


t E いろ いろ と キャ ラク タ が 出 て くる の 
は 楽し いで すね. 


XO Jj 
[1| と と [3] で YW 型 の 戦車 を 操っ て , 目前 に 


立ち ふる が る ピラ ミッ ド や 半球 型 の 住居 ド 
ー ム に 激突 し な いよ うに うま く か わし て く 


だ さい . また 画面 中 央 付近 か ら ふ い に 現 わ 


れる テレ ポー ト 地 雷 も 踏み つけ な いよ うに . 

それ か ら , この スク ロー ル ・ ゲ ー ム の 目 
玉 商 品 ( カ ナ ? ) の 川 も 落ち る と 沈ん で し ま 
いま す . ZORD, 川 に ある 橋 を 渡っ て く 
だ さい . 得点 は 1 キャ ラク タ 分 進む ご と に 1 
点 で す . まれ に , 川 が 2 つ 連 続 し て 並ん で 
いる 上 に 橋 が つなが っ て いな いと き や 。 
障害 物 の た め に 渡れ な か っ だ た りす る と き 
が あり ます (乱数 の 成せ る 業 /) が , その と 
き に は 「MZ バ パン ザイ /」 と で も 叫ん で 自 
減 し て くだ る さい. 


P.S, 


来 月 は ポー ル ・ ポ ボ ポジション を まわ ね て, 


この まま で は 川 を 渡れ な い . ノ 


99. 


3D 画 面 の カー レー ス ・ ゲ ー ム Race) を 
送る 子 定 で す . 


mu Tank BASIC ' x F Gss 


10 CONSOLES2, 24, C40, №: TEMPO7: РОКІ =0Т023 
: CURSORO, І: PRINTSTRINGS ("it", 39) :NEXT: DIM 
C$(2) :C$(0) =" V /oeD/V" t C$ (1) "8099008 " :C$ 
(2) =" ron ":М=19 

20 POKE$952,0:GETC:POKE$952. 166: M-M-(C- 
1) X (M22) € (C22) k (M< 39) : CURSORM, 2: PRINT" е" 
: MUSIC"RO" CURSORO; 24: PRINTSTRINGS ( "$", 3 
9) 

30 CURSORRND (1) ¥38, 21: PRINTC$(RND(1) X2) 
: IFRND( 1) <. STHENCURSORRND ( 1) K39, 7: PRINT" 

"z IFRND(1) <. OZTHENCURSORO, 23: PRINTSPACE 
$(39) : CURSORRND ( 1) K34, 23: PRINT ИЙ" 

40 IFCHARACTER$ (M, 2) =" "ТНЕМР=Р+1 : CURSO 
R2,0:PRINT"Point :";P:GOTO20 


あな た は 地雷 を よ け て 無事 に ゴー ル に 着 
ける か ? ハラ ハラ ドキ ドキ の 思考 型 (?) 
ゲー ム です . 

太 ミ ニ PiO イ ン フ ォ メ ーション 


実行 する まで | リス ト ど お り に 入力 し て RUN. 


地雷 や ワー プ ・ ゾ ー ン だ け じ ゃ な く 
総 評 | て 他 に も 何 か あ っ た 方 が も っ と 面白 
か っ た の に …. 


遊び 方 


10 REM ### カカ "に シシ "ライ 77-2 *** 

20 DIM GHX (40) , GHY (40) ,GIX(SQ) ,GIY (SO) ,W 

AX C200 , WAY (20) : INIT:GI-6:WA-3:GL-1:HI-Q 

20 SC-0:CLS4:WIDTH4Q: COLOR7 

55 LOCATE 10,10: INPUT"LEVEL (1-5) "LEV: IF 
LEV 1 OR LEV:55 THEN 35 

40 CLS4: COLOR7:Jz1:GX-z6:GY-10 

50 LOCATE1,1:PRINT" rrr rrr 

— " 

60 ҒОКҮ-2Т0205ТЕР2:1 ОСАТЕ1,Ү:РБІМТ"! | 1 
ұлар са ы Та d PEMEXT 

70 ҒОКҮ-5Т70195ТЕР2:1 ОСАТЕ і, Ү:РКІМТ" ++ 

ーー トー キー トー トー トー トー キー オー ゴ |" NEXT 

80 LOCATE1,21:PRINT" —— r aI 

4—2—1":2$-CHARACTER$ (GX*2,GY*2) 

90 ҒОКІ=1Т061:6ІХ (І) =ІМТ‹КМр (1) +11) +1: 61 

Y (1) =INT (RND (1) #8) +1: NEXT 

100 FORI=iTOWA: МАХ (І) =INT (RND (1) #11) +1: Ww 

AY CI) =INT (RND (1) #8) +1: МЕХТ 

110 LOCATE28,12:PFRINT"HI-SCORE";:LOCATE2 

8,14: PRINTUSING"&4444 Point"; HI: LOCATE3A 
16:FRINT"By- "ssHI を 

120 GLX=INT(RND(1)*11)+1:GLY=INT(RND (1) ж 

8)*1: IF LEV-1 THEN Z-2:21-5122-0: РА=25: 6 

0508200: РА=0: 2=0:21=0: 22-0: 605068200 ELSE 
РА=0: 2=0:21=0: 22=0: GUSUE さ の の 

130 GHX(J)-2GX*2: GHY (J) -GY*2: COLOR6: LOCAT 

Е28,5: PRINTUSING"7h ## 74/"s40-J 

140 LOCATE28,7:FRINTUSING"##### Foint":S 


地雷 を よ け て ゴー ル す れ ば よい の で す . 
テン ・ キ ー の | al2][4][6| で 移動 し ます . 


JUL, Жы е дё т Абу КЬ Е Е 
ー ぞ する か わか り ま せん . 


з ж 


レヒ ベル は 1 一 5 まで あり ます が 。 違い は 自 
分 で 確 め て くだ さい . まだ , メッ セー ジ は 
右上 に 出さ ます “オシ イノ " Lie 6 X š 
だ は Y 座 標 が ゴー ル と 一 致し た こと を 表わし 
元祖 地雷 ゲー ム BASIC リ スト 


141 М=@:ОМ LEV GOTO 142,142,144,145,150 
143 IF BLX=GX OR GLY-GY THEN COLOR4: LOCA 
TEZ0,9:PRINT "3:44! ! " ; TEMPOSOQ: PLAY"OASFFD1 
6":PAUSEZ: LOCATEZQ,9: PRINT" "s 

144 М-5 

145 PSET(GX*16*2,GY*16*2,6) : PSET(GHX(J-1 
) *B8*3,GHY (Jー1 ) *B&Z, M) 

150 IF GX=GLX AND GY=GLY THEN PLAY"O2FFE 
FEGFGFGCGCACACBCDER12DFGCB" : LOCATEZQ,9:P 
RINT "GOAL ! ! " :,GOSUBRZ240:GI-sGI*1:WA-WA*.5:8 
С=5С+ ( (40-7) *(10-LEV) /2) FORI-QTOSC STEF 
10: ОСАТЕ28, 7: PRINTUSING"44HHHI" ; IZ PLAY"O 
5B16":NEXT:GOTOAQ 

160 IF CHARACTERS$ (GHX (J) ,GHY (J) ) ="E"THEN 
COLOR 2:LOCATEZ0,9:PRINT"BOMB! ": TEMPOSQ 
Q: PLAY"O1DDC: О2СВВ: OSADE" : GOSUBZ4Q0: GOTOZ 
5 の 

180 FORX1-2-2T02:FO0RY12-2T02:1F CHARACTER 
$ (GHX (J) *X1,GHY (J) *Y1) "2"THEN COLOR 2:L 
OCATEZO,9:PRINT"£77!'":TEMPOSQOQ:PLAY"OSG 
G":PAUSES:LOCATEZQ,9: PRINT" " 

190 NEXTY1,X1 

200 IF CHARACTERS (GHX (J) ,GHY (J) ) ="W"THEN 
COLOR S:LOCATEZO,9:PRINT"WARP ! ": TEMPO1Q 
QQ:PLAY"O2FDE: OSGCC: OBABF " : GX- INT (RND ( 1) 
*11)*1: GY2 INT (КМО (1) #8) +1: GOTO220 

220 А%-ІМКЕҮ%:0М VAL(A$)G0TO220,260,230, 
270,220,280,220,290,2202:60Т0220 

240 COLOR1:LOCATEZQ,10:PLAY"O2D":PRINT"z 


と いう こと は ゴー ル も 間近 だ な 


š T. ^» 
り に 地雷 が あり ます . 


P.S. 


今度 は PCG を ふん だ ん に 使っ た 高速 ア 


と 出 だ な と き は 自分 の 回 


クシ ジ ショ ン ゲ ダー ム を 作り だ いで すね ー.。 
も うす で 高 3 な の で 無理 か な 一 . 


t 


AAA! '":PAUSEI:LOCATESO,10: PRINT" 
"ss = ゴー1 

250 A$-"":J-J«1:1F 01-40 THEN GUSUE さ 4 GO 

70250 ELSE 6070120 

260 IF 6Ү<10 THEN GY-GY*1:GOTO250 ELSE24 


の 
270 IF GX>1 THEN GX-2GX-1:GOTO250 ELSE24 の 
280 IF GX<12 THEN GX-GX*1:GOTO250 ELSE24 
a 
290 IF бҮ>1 THEN GYzGY-1:GOTO25Q0 ELSE 24 
@ 


200 FORI-1TOGI:COLORZ:LOCATE GIX(I)*2,GI 
Ү(1) *2: РКІМТ "2"; : МЕХТ 

310 FORI-1TOWA: COLORZ1:LOCATE МАХ (1) #2 ,W 
AY CI) #21 РКІМТ "И"; : NEXT 

320 COLORZ2:LOCATE GLX*2,GLY*2: РКІМТ "6" ; 
: FAUSE РА: RETURN 

330 LOCATE1,22 

540 222:21-z5:2223:G08UB200:FORI-1TO J:LO 
CATEGHX (1) , GHY (1) :PRINT"X":;:LOCATEGHX(I- 
1) ,GHY (I—-1) : PRINT"-"$:PAUSES: NEXT: RETURN 
350 CONSOLE22,1,1,24:IF НІ<5С THEN LOCAT 
E1,22: INPUT"Hi-score! input your name";H 
I$:LOCATE1,22:PRINTSFC (39) :HI-SC 

360 LOCATE10,22:INFUT"TRY AGAIN"; АМФ: IF 

INSTR("NnZ2",AN$)-Q0 THEN CONSOLEQ,24,0,:9 
:GOTOSO ELSE END 


р (2, 02604x5U0XER&SA-^PIOEWCOCGIRZLUE.» パラ バラ と 内 容 を 見 た と き 、「 あ っ まだ ソノシート が ある 」 と 思い まし た だ た. と 
ころ か が, も う 1 冊 違う PiO を 見 た とき , 僕 は あせ り ま し た .「 今 月 の PiO は 赤い ソノ シー ト が 付い た の と , 青い ソノ シー ト が 付い た の と 2 
p 種類 出 て いる ん が だ 」. 僕 は 迷っ た あげ てく, 色 の 好き な 青い ソノ シー ト の PiO を 買っ た の で し た . 家 で 見 る と 2 つと も ある で は な いで すか . 編 
I 集 室 の 方 , これ か ら も 2 種類 と し いわ ず に 。 3 種類. いや 4 種類 も の PiO を 作っ て くだ さい .  P.S.1 この 文章 の 内 容 が わか る 人 は 何人 いる だ 


1999%, A 国 は ある 星 に 進出 し た . し か 
し その 星 に は すでに 日 国 の 秘密 基地 が あり , 
戦争 に な っ て し まっ た . そし て 2001 年 , B 
国 は バリ ア を も 溶かし て し まう 恐る べき 
"遊星 爆弾 "を 開発 し た . 


10 REM XX PLANET 2001 XX 
20 FORI-1TO3:ACI) SINTCRNDCI X 19) 
+é :READC :B( 1) =С:МЕХТ :ратаі, 3, 5 
39 SCREEN1,1,1:CLS:CONSOLE,, 0,0: 
PLAY" sam 10920" : EXECKH1058 
49 INPUT"L^"À (1-129 " 5L :CLS 
59 IFL く 10RL> 12THEN49 

А%=" "+CHR$( 29) +СНЕФ 31) +" e" 

LOCATE1,14:PRINT"* 

+"ф:Х=? 

REM ФФ MAIN ROUTINE ФФ 

ЕОРІ= 1T03 : ら =STICKC9> 
100 UX=X+(S=7) -(828) +〈SCREEN(X+ 2 
, 14) 232) -CSCREENCX , 14) 232) 
118 LOCATEX,13:PRINT"  ":X=VX 
120 LOCATEX,19:PRINT"[..1" 
130 BK D =В‹1) +1 


*k š —-PiO 4775-»*—7a-7 
| モー ド を 1, ペー ジ 数 を 2 にし, リ 
実行 する まで | スト とおり に 入力 し て RUN. 
総 評 単調 で すね . も う 少 し 凝っ て も よ か 
っ た の で は ? 


PLANET 2001 BASIC リ スト 
IFSCREEN (ACI) ,В‹1) ) =25THEN 1 


ІЕВ‹1)=14 THEN239 
LOCATEAC 1) ,BCI? -1:PRINTA$ ; : 


GOTO 90 

REM ФФ は "< た "に し k »ut ӨФӨ 
SC-SC*10:PLAY"oSl!ó4dcdefgab" 
LOCATEACI? ,BCXI? -1: PRINT" "CH 
R$C295 $ CHR$(CS31)5 "X" 

218 BCD = :А<1) ZINTCRNDC 12 X 19» +6 
: GOTO 150 

220 REM 44 は "< は っ LE Lil 

230 LOCATEACI) , 139:PRINT"X" :FORE- 
іТ0&:1 ОСАТЕА‹ І) -Е, 13: РКІМТ" <" 
240 PLAY"OoS3!44cd":LOCATEACI? +Е, 1 
З: РВІМТ" 2" :NEXT 


今 は た だ 逃げ る 一 手 し か な い 


遊び 万 
あな だ は バス ケッ ト で バリ ア を っ て く 《 


ас, 爆弾 は 電波 も 発する の で , それ に 
当たっ て も や られ ます . 


250 IFACI» -94XANDAÀCI? *7»XTHENS00 

260 FOREZ-STOI1STEP-1:LOCATEA(I)-E 
;19:PRINT" ": РАУ" 031 64са" 

270 1 ОСАТЕА‹І) *E, 13:РВІМТ" " :МЕХ 

T:LOCATEACI? ,13:PRINT" " 

288 LOCATEACI? -3,14:PRINT" 
"sGOTO 210 

298 REM ФФ GAME OVER ФФ 

300 LOCATE10,4:PRINT"GAME OVER"S 

PC(55) "SCORE" SC 

810 LOCATES8,8:PRINT "HIT SPACE B 

ER":IFSTRIGtO8) = 1ITHENRUN 

320 GOTO 3180 


遠い 未来 の 話 だ . 人 々 は 我々 の 住む 宇宙 
を 開発 し つく し て し まっ た 。 そこ で て 列 の 宇 
宙 へ と 手 を 広げ 始め た が , 別 の 宇宙 へ と 飛 
ぶ に は スタ ー ゲ ー ト を 通っ て 5 次 元 の 世界 
を くぐら な けれ ば な ら な い の だ っ た . 

た いて い の ス ター ゲー ト は , 周囲 に 浮遊 
物 を 吸い 寄せ , 岩石 帯 を 作っ て いる . それ 
を く で ぐり 抜け , スタ ー ゲ ー ト へ と 突入 する 
の は 容易 な こと で は な い …. 


廊 ミ ニ ロ IO イン フォ メー シ ジ ション 
モー ド を 1, ペー ジ 数 を 2 に し , U 
実行 する まで て | スト と ぉ おり に 入力 し て RUN. 
. т | ドン ト の 動き は 前 作 の よう に 慣性 を 
付け た 方 が よかっ た の で は ? 


————— の 
[op arde Ven т еш 
1 ーー! +! GAMER S | 
lk ЕН Ме Т СУ АШ" 
| 
| 
| 


| Бу Ninijin.Kitsune 
| SGC М0.24 
For Рс-6000 Series 


CONSOLE ,,,0 

SCREEN 3,2,2:COLOR 3,1:CL$ 
GOSUB $49 

IF IK$2"d" THEN GOSUB 1158 
CLS:COLOR 4 
Xz128:Y2190:R-1:XP-71 

ON R GOSUB 250,320,580,390,50 


^55». 


遊び 万 

RUN す る と タイ トル が 表示 る れる の で 
デモ か ゲー ム か を 選ん で くだ る さい. な お 。 
デモ 中 "DEMO" が 表示 る れ て いる と き 
に [5| キ ー を 押す と ゲー ム が スタ ー ト し ま 
す . | 

跡 を 残し て 走る ドッ ト が あな だ の 船 で 。 
これ を 操っ て 赤い 浮遊 物 ( ほ と は いっ て も 動 
きま せん が ) に ぶつ か ら な いよ うに 黄色 い 
スタ ー ゲ ー ト に 突入 し て 〈 く だるい. 操作 キ 
ー は カー ソル ・ キ ー の み で す . 


プロ グラ ム 
コス モ ・ ト ラベ ル 1999 BASIC リ スト 


a 

80 LINEC@ ,9) -(255,19 D ,4,B 
90 REM === ニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ = 
180 PSET<X。Y) ,3 

110 59-6ТІСК(0):51-5ТІСКС1) 

120 IF S023 OR S128 THEN ХР= 1 
130 IF 50-7 OR біт? THEN ХР=- 1 
140 YzY-1:X2X*XP 

150 IF POINT(X,Y ぅ >=2 THEN 180 

168 IF РОІМТ<Х,Ү2<21 THEN 248 
170 GOTO 100 

180 LOCATE 0,14:COLOR 2:PRINT "C 
LEAR!'!":RzR*1 

190 PLAY "T258L404GABOSLSCR14CL2 
DL1C" : 

208 FOR I-0 TO 100:МЕХТ 

218 IF R=é THEN 990 


P.S2 340 PiOPiO70^— 7 ОЖ ін 5 А i£, 僕 の 近所 に 住ん で いる 人 で すか ? 


この 面 は と に か く 小 きざみ に 動く の が コツ 


РіО 85 年 1 月 号 か ら ア イデ ア を い だ だ 
きま し だ が 。 プロ グラ ム は オリ ジ ナ ル で すず す ., 
原作 の か が 短く 整っ つて いる と いう 声 が … 
( グ サ ッ ア )。 で も 。 CRURA 4B ST 
甚 代 し て くだ る い … ぐ っ すん . 

な お, 剖 楽 は PIO パ ー ツ より い だ だ きま 


b. PS. 


みん な S.G.C 発 行 の “SiO” を 講読 し な 
vo»? 70 円 切手 を 同封 し て 香取 る ん に 手 
紙 を 送っ て くだ さい. 楽し い 本 で す よ 。 4 
FEL 4 E 


220 FOR I=0 TO 500:МЕХТ 

290 X2128:Y2190 :XP= 1 :CLS: GOT0Z9 

248 LOCATE 0,14:С0( ОҒ 2:PRINT "D 

IED''''":1GOTO 710 

250 REM ROUND 1 ニー ニニ ニテ テニ ニー ニニ ニー ニニ ニテ ーー 

268 LOCATE 8,10:PRINT "e [ILI 

LII e": 

278 FOR I=0 TO 4:PRINT "e © eee 
& e" ; : NEXT 

280 PRINT "ӘФееее eee eee"; 

290 LOCATE 8,3 :PRINT "eeeeece 

eos0900" ; 

388 COLOR 2:LOCATE 0,0:PRINT SPC 

(7»:;"e":COLOR 4:PRINT SPCC?);"e" 

210 RETURN 

329 REM ROUND 2 ====== 

338 COLOR 2:PRINT SPC(7)5;"&e":COL 


(和歌 山県 の 河瀬 と いう 所 に 住ん で いる ボケ コン ぴ びいき の Katton ) 


19 


pio 


コス モ ・ ト ラベ ル 1999 BASIC リ スト 


OR 4 750 DATA o5f4 .ed4a34e4 .d4 に 2o4b4b4 1180 LOCATE 8,I:PRINT 「 の の の の の る の 
340 PRINT" " :PRINT "@@@ өсе есе oScád4e2.r4 69090099" ; : NEXT I :COLOR 2 

e900" :PRINT" " 780 FOR !=9 TO 8980:NEXT 11?8 LOCATE 8,0:PRINT"DEMO:eeese 
350 PRINT "әееее 000 000060" :PRIN 770 CLS:LINE(8,0» -(255,19 15 , 3,B: e" 

T" ^ COLOR 3:PRINT "Died" 1288 0х=130:1=191 

360 PRINT "ее ee 00 ee 80 ":PRIN PRINT "by K.KITUNE. 1985" 1218 PL-INTRNDC1» X25 + 1 

T Әй PRINT:PRINT:PRINT:PRINT 1228 IF PL-2 THEM PL--1 

370 PRINT" e e e ө "PRIN PRINT "====Rounde === 1230 DX=DX+PLX2:I=I-1 

T PRINT "Clear......." iR-1 1240 IF POINT(DX,I)=1 THEN 1298 
380 PRINT:PRINT "ӨӨ ee 066 ee гө PRINT CMON .......",R 1250 PT-POINT«DX,I? 

"RETURN PRINT "Let^s Replay!" 1240 IF PT=2 THEN 1316 

390 REM ROUND ч ニニ ニニ ニテ テニ ニニ ニニ テニ ニー FRINT "Push ^^ Ұшы” 1278 Х=рх:Ү=1:60506 1470 

айй COLOR 2:PRINT 5РС‹ 5) ; "ӨӨӨ": PRINT " “d: Demo" 1288 LOCATE 0, 13:РРІМТ "Died'":G 
COLOR 4 IF ІМКЕҮФ=" =" THEN CLS:COLOR OTO 1338 

410 PRINT "eeeeee ee ееәеев"; 4:EXEC&H1BB3:GOTO é4 1290 PSETCDX,I? ,3:RO-RO*1:6G0TO 1 
420 PRINT "@@@@@ e © 00000"; 878 IF INKEY ま ="d" THEM EXEC&H 1BB 210 

430 PRINT "@@@@ e se e oeoo"; 8:GO0TO 1146 1390 RO-RO*1:GOTO 1218 

440 PRINT "eee の の の の の の の の ooe"; 880 GOTO 849 1310 LOCATE 8,13:PRINT "CLEAR!!! 
459 PRINT:PRINT:PRINT 890 REM СҺатр!! ニー ニニ ニー ニー ニー ニニ ニニ ニニ ы 

460 PRINT "ee ee ee ee гө е”; 900 COLOR S3:CLS:PRINT " ——":PRI 1320 PLAY "T25804L4GABOSLSCR15L4 
470 PRINT" ө e ө ө ө"; NT "L—24":iPRINT “ニー くり ある あー!" i 1C* 

480 PRINT "90 ee の の өө se е”; PRINT "You are Champ'" 1338 FOR [=й TO 168900:NEXT:CLS 
490 RETURN (ІМЕ(й,0:2-(255,1912,3,В 1340 LOCATE 9,3 

500 REM ROUND 5 = ニニ ニニ ニニ ニニ ニー ニー ニー ニニ ニー GOTQ 839 1350 COLOR 2:PRINT "ーー テー らい 
510 COLOR 2:PRINT 5ҒС(5»;" 0006000 REM Title ニニ ニニ ニニ ニニ テニ テニ ニニ ーー * ; 

"COLOR 4 PRINT " ————n ーー tJ: 1360 COLOR 3:PRINT "| コト ー 1111 
520 PRINT " ӨФӨ өзө ве "; PRINT "| m — I 1 ; Ж 

530 FOR I=8 TO 5 70 PRINT ; 1379 COLOR 4:PRINT "レー ыы дыз 
540 PRINT "eee eee еее еее"; PRINT ; — À 

550 NEXT I * PRINT * $ 1886 COLOR 2:PRINT "Cosmo Travel 
520 PRINT " ° na в "4 1000 PRINT " ~ LL— + ыз"; 

570 RETURN 1910 PRINT "COSMOTRA'EL " 1390 COLOR 3:PRINT ЅРС‹ 12) ;" 1999 
580 REM ROUND 3 =============== 1020 PRINT " 1999*5 

590 COLOR 4:PRINT "eese өөее e 1830 COLOR 4:PRINT By K.KI w AWA COLOR 4:PRINT "=====PC¿&001= 
есе"; TUNE" % COLOR 3 ==== " ; 

590 PRINT "e * е "s 1840 PRINT "For PCó000series"; 14168 COLOR 2:PRINT " Ву K.KITUN 
610 PRINT "@@@@@ e еее 4 1050 LINE (0,0)-<255,191),3,8 E."; 

628 PRINT " e ө . ө vi 1060 PRINT:PRINT 1420 FOR 1-й TO 100 

636 PRINT нее の の の e еее”; 1070 PRINT "а^ Key DEMO(?5" 1430 LOCATE 9,9:CL=INTCRNDC 1) X2) 
440 PRINT " е ee 6 1080 PRINT "”е” Key START!" *2:COLOR CL 

6580 FOR 1=0 TO 4 1085 RESTORE 1100 1440 PRINT "Push/s^ to Start"; 
568 PRINT "e0000 の の の の つの өен"; 1090 READ А%,БВФ:Р( АҮ ^%+Б% 1450 IK$-INKEY$:1F IK$-"s" THEN 
670 NEXT I 1100 DATA %18018ғ160о4с 166416ездҒе 41 

é80 COLOR 2:LOCATE 2,3:PRINT "e" fgeogglófióefgaB.r32 1460 NEXT I:GOTO 11460 

8908 LOCATE 9,3:РРІМТ "ө" :1 ОСАТЕ 1110 DATA eiófilóGO0S5co4bagagfefed 1470 FOR I-0 TO 39 

13,3:PRINT "e" cár 14 1488 LX-INTRND(C 1) X256» :LY-ZINTCR 
700 RETURN 1120 IK$-INKEY$: IF IK$z"s" OR IK М0< 1) X192) : CL=INT(RND( 1) ХЭ) +2 
210 REM Died = ニ = ニ = ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニ ま ="d" THEN EXEC&H1BB3 : RETURNN 1498 PLAY "1 る 24o6C" 

720 GOSUB 1470 1130 GOTO 1120 1500 LINECX, Y) -CLX,L Y)? , CL :NEXT 
738 RESTORE 748:READ A$ ,B$:PLAY 1140 1518 RETURN 

A$+B$ 1158 COLOR 4, 1:CLS 

740 DATA t19918 ッ 19o4e4a2r4abo5c2 1140 LINE «8,0» -‹ 255,191) ,4,B 

rácde2r4f4d274 1170 FOR 1=3 TO 13 


ハイ ・ ス コア ҒОН--МЕХТЯ 
スコ ア STRIG の 値 
ラウ ンド š 自分 の 進む 
自分 の XY 座標 方 向 


REM 文 
Н-0 


あな た は , と て も 恐ろし い ア ン バ ラ ン が 上 に 動き 出し , 上 の と き は 左 に , 左 の と 初期 設定 

ス ・ ゾ ー ン に 迷い 込ん で し まっ た . な ぜ こ き は 下 に , 下 の と き は 店 に 動く と いう こと 。 9 

こ が そ れ ほ ど ま で に 恐ろし いか と いう E, ET. お わか か みよ まな ね なか? キー 入力 待ち 

体 の 自由 が きか な く な り , まとも に 歩け な どう し て も , ゲー ム が 名 し いと いう 人 は , x MAIN 

く な る か ら な の だ …. 時 間 に 制 限 は な い の で , ゆっ くり と 落ち 着 [SPACE] を 押し た と き の サ プル ー チ ン 
あな た は , 果たし て 生き 残れ る だ ろう か . いて ゲー ム を し て くだ きい 。 それ か ら 1 面 判断 

六 ミ ニ PiO イ ン フ ォ メ ーション クリ ア す る と ,。 ボー ナス が も ら え ます . 2 297 


ゲー ム ・ エ ンド 


モー ド を 1。 ペー ジ 数 を 2 に し 。 U れ で 次 の 面 へ 行け ます . 


“` | スト と どおり に 入力 し て RUN. р k M COU EG 許 が きら いな 人 は 570 行 を カッ ト し て くだ 
が 寂し いね 、 も っ と に ぎ や か に 
E темекі 9? снаа | зо. 


プロ グラ ム 


プロ グラ ム の 流れ は 初期 設定 を し て , ІҢ 
面 を 作り , 音楽 を 鳴ら し , キー 入力 を 待っ 
て ゲー ム ・ ス ター ト と いっ た 感じ で す 。 


600 一 650 行 は , | SPACE を 押し た と き 


с, 自分 が どこ へ 動く か きめ る サブ ルー チ 


c qa. 


———Á— II rT r nr ir [hm wa 
©) 8 PiO を 読む の は 2 月 号 が 初め て な ん で す が , に ぎ や か で すね ェ ー. I/ 〇 と は また 1 つ 違 っ た 世界 が あり ます . ST, 私 の FM-7 な ん て です が. 
Ол 倍速 ロー ド , モー プ が 絶対 に きか な いん で す よ . モー プ が で き て も ロー ド は で き な い ….、 ど うし て な ん で し ょ う ? ダレ か わか り ま せん か 2? 
自分 で プロ グラ ム を 作っ て て , 走ら せ て みる と まっ た く 子 想 外 の 結果 (BUG は な いと し て ) と た な っ た こと あり ませ ん か ? ボー ター カラ ー を 
高速 で 切り 換え る プロ グラ ム を マシ ン 語 で 作っ て 走ら せ た ら , ア ゼ ン と し て し まっ た …. まさ か あん な 風 に な る と は … 


遊び 万 
あな た ( 合 ) は , | SPACE キー た っ た 1 つ 
で コン トロ ー ル し , 障害 物 ( 〇 ) を よ け て 出 
日 ($$) ま で 無事 た ど ビ り つい て くだ る るい. 
ちな み に , この ゲー ム の キー の 使い 方 を 
詳し 説明 し ます と , 自分 が 右 に 移動 し て 


いる と き に | SPACE キー を 押す と , 自分 


トッ 


この ゲー ム の キー の 使い 方 は , 慣れ れ ば 
と て も 簡単 で す 。 し か し , 面 が 進む に つれ 
障害 物 も 増え る の で 難し く な る で し ょ う . 


ul アン バラ ンス ・ ゾ ー ン BASIC リス ト 


10 REM XXXXXXXXXXXXXXXXXXXXXXXxX 
20 REM Ж TORNA UK Zo x 
.39 REM X 1984.11.16.PC-6001 X 
XXXXXXXXXXXXXXXXXXXXxxxxx 


IPLAY "8" 
220 хХ=15:Ү=7 s 
380 REM = SCREEN コローー ニ マニ マーー ミ モー マ 
810 SCREEN 2,2,2:С0М501Е0,16,0,0 
:COLOR 1,9:CLS 

820 LINE£9,18» -( 256,1922 , RNDC 1) X 


8*1,B 
330 COLOR 4:PRINT "(SCORE < 
7-92 HI-SC 1% 


340 COLOR 2:LOCATE  $6,0:PRINT S 
350 LOCATE 26,0:PRINT H 

340 COLOR 1:LOCATE 1,2:PRINT "XX 
メメ メメ メメ メメ メメ メメ メメ メメ メメ メメ メメ メメ メメ メメ" 
378 FOR I=3 TO 14:LDCATE 1,I:PRI 
NT "X*"4SPCC200 (7%: NEXT 

2380 LOCATE 1,14:PRIMT "XXXXXXXXX 
XXXXXXXXXXXXXXXXXXXxxx" 

390 FOR Ісі TO S*M 

400 COLOR 2:LOCATE RND(1?X28*2,R 
NDC12 X11*3:PRINT "O":NEXT 


あな た は , ロボ ッ ト の コク ピッ ト に 乗り , 
画面 に 出 て くる 瑞 を や っ つけ て くだ さい . 
支 ミ ニ ロ IO イン フォ メー シ ジ ション 


モー ド を 1, ペー ジ 数 を 2 に し , U 


スト どおり に 入力 し て RUN. 


4 » 敵 を 撃っ た 跡 が 残る と も っ と よかっ 


RUN L T >` е il | RETURN で ゲー 
ム ・ ス ター ト で す . О 25 н — У 


n 移動 し , 敵 を 撃つ SPACE |x 一 ) と 
10 点 プラ ス さ きれ, 逆 に 味方 を 撃つ と ミス と 
な り ま す . 150 以 内 に 敵 を や っ つけ な けれ 


REMXXXXXXXXXXXXXXXXXXXXXXXXX 
REMXXXXXXXS40. 1. 30 Ж) XXXXXXX 
REMXXXXXXX し ょ うし " ゅ ku — XXXXXXX 
REMXXXXXXXPC-400 1 だ m 2X XXXXXX 
REMXXXXXXX/&&/SP XXXXXXX 
REMXXXXXXX By Naoya  XXXXXXX 
REMXXXXXXX Yagishita.XXXXXXX 
REMXXXXXXX MINI PIO XXXXXXx 
REMXXXXXXX 7*07"546  XXXXXXX 
REMXXXXXXXXXXXXXXXXXXXXXXXXX 

180 REM XXXXXXX し ょ き wozu XXXXXX 

110 GOSUB 530 

120 SCREEN 2,2,2:С0М501Е0,16,0,0 

:COLOR 1,0,1:CLS 

130 LOCATE X,1:PRINT "+" 

140 LOCATE 0,Y:PRINT "k" 

150 LOCATE 2,0:PRINT "C246- MI 

SCORE- )t zz- 1" 

160 REM XXXXXXXXX メイ ン XXXXXXXXX 

170 FORI-0TO10000 :TI-TI*1 

180 LOCATE 7,0:PRINT TI:LOCATE 1 

8,0:PRINT S:LOCATE 28,0:PRINT MS 

199 Е=ІМТ‹ЕМО< 1) X105 +1 

200 IF Е<КМ THEN P$-"9":GOTO 230 

210 IF E>KT THEN P$-"4":GOTO 230 


また 。 何 十 面 も クリ ア す る と , 障害 物 が 増 


ぇ えす ぎ て ゲー ム に な ら な いか も し れ ま せん . 


СЬ, な ん と か 頑張 っ て (だ さい : を うす 


418 COLOR 4:LOCATE RND15X27*2,R 
NDC1»?X11*3:PRINT "ee" 

420. REM: SOUND . ニ ーー テテ ァ で デー ウー テー 

430 A$-"12202cdcdcd":B$-"12203ef 
efef":C$-"122049agag»a" 

448 FOR Ісі TO 2:PLAY A$:PLAY АФ 
QB$:IPLAY A$, B$, C$:NEXT 

4909 REM — T" НЕ rm 

460 COLOR S:LOCATE X,Y:PRINT "e" 


:VX=0 :UVY-0 
478 IF STRIG(0)=0 GOTO 470 
500 REM = MAIN ================ 


518 T-STRIG8)5 

528 IF T-i THEN GOSUB 400 

538 IF SCREEN CX+UX 。Y+UY) CASC" 
") THEN 700 

550 COLOR 1:LOCATE X,Ys:PRINT* " 

560 X-X*UX:iY-2Y*VY: COLOR S:LOCATE: 
X,Y:PRINT "Ф" 

570 К=ІМТ‹ЕМС‹ 1) Х 15) + 1:PLAàY “тг 
:04122с" 

580 GOTO 500 

6900: REM. -HIT-SPC KEY. mi a 

618 IF Ух-й AND ЧҮ=@ THEN 'VXz1:V 

Y=9 : RETURN 

628 IF いり ※=1 THEN リヤ ニー 1 : り X= ニ 9 : RETU 

RN 


ウー ム , 瑞 と 味方 の 区 別 が つか な く な っ た 


ば クサ デイ で きま で ザ 刀 。 
クリ ア す る ご と に 味方 の 数 が 多く な り ま 
3. 


220 GOTO 289 

230 ТХ=ІМТ‹ ЕМО ‹ 1) X305 + 1: TY2 INTCR 
NDC1»X145 +1 

240 IF TX«2 THEN TX=2 

250 IF ТҮ<3 THEN TY=3 

268 LOCATE TX,TY:PRINT P$ 
280 ST=STICK(9〉 :SG=STRIG(0> 
298 LOCATE X,1:PRINT" " 

300 LOCATE 0,Y:PRINT" " 

310 629999 THEN 780 

320 MS=3 THEN 660 

330 ТІз15ӨТНЕМ 719 

349 ST= 1】 THEN YzY-1 

359 ST=5 THEN Y=Y+1 

360 ST=3 THEN X=X+ 1 

370 ST=7 THEM Х=х-1 

389 SG= 1 THEN 470 

390 Y く 3 THEN Y=3 

400 Y>14 THEN Y=14 

418 Х<2 THEN X=2 

420 X»30 THEN Х=30 

430 LOCATE X,1:PRINT"-4" 

440 LOCATE 0,Y:PRINT" k" 

4580 NEXT 

460 REM XXXXXX は し に "し XXXXXXXXXX 


IF UYz-1 THEN UX=-1:UY=0:RET 
IF UX=-1 THEN VY= 1: り X=9 :RETU 
IF UYs1 THEN UX=I1:UY=0:RETUPR 


REM - SCREENK x ‚у> 

IF SCREENCX*UX, Y */Y) <>А5С("% 
"> THEN 8608 
728 FOR Ісі TO 20:PRINT CHR$C?); 
PLAY "13207c" : NEXT 
730 М-М%1:5-5%10:1ІҒ S>H THENH=S 
735 IF M-»30 THEN M= 1 
740 GOTO 228 
800 REM - THE GAME OVER 
810 PLAY "sl0o4clv","s10oS5c1"," 
ъ1ійоёс 1" 
815 LOCATE X,Y:COLOR 4:PRINT"X" 
820 COLOR 2:LOCATE 0,2:PRINT " — 


PRINT " 1GAME OVER|" 

PRINT “ІНІТ 5 KEYI" 

PRINT “lJ 
EXEC&H10858:1F S>H THEN H=S 
I$-INKEY$:1F 1$-"s" ТНЕМ200 
IF I$-"S" THEN299 

GOTO 870:REM XX THE END XX 


照準 の 位置 
タイ ム ・ カ ウン ト 
スコ ア 

ミス の 数 

敵 の 出る 番号 
キャ ラク タ の 形 
i Oo 8 
STICK( 0 ) の 値 
STRIG( 0 ) の 値 
X と Y の 位置 
や っ つけ た 瑞 の 数 
レベ ル の 数 


表 2 行 番号 マッ プ 


470 PLAY "L10068." 

480 QK=SCREENKX 。Y) 

490 IF AK-ASCi"") THEN PLAY "ol 

со2с" :5=5+ 190 :М=М+ 1: 60ТО 520 

500 IF AK=ASC(" 0") THEN PLAY "ni 

S." :MSzMS*1:GO0TO 520 

510 PLAY "ni." 

520 LOCATE X,Y:PRINT" ":GOTO 160 
530 REM XXXXXXX DEMO XXXXXXXXXX 
540 Х=19:Ү= 10 :ТК=0 :МІ =0 : КТ=6& : КМ= 
5:1=1 

550 SCREEN 3,2,2:CONSOLE9 , 20,0 ,6 
iCOLOR 2,9,1:CL$ 

555 LOCATE2,1:PRINT "Hi -SCORE" H 
I 

560 LOCATE 0,3:PRINT "XXX 

e xxx" 

$570 LOCATE 0,6:PRINT " @ sss. ... 
z% " 

580 LOCATE 0,8:PRINT " 9 ·...... 
ND 

590 LOCATE 9。19sPRINT " b, °° 
Le DL" ahe" 

400 PLAY "L15S10M108004CDFAEDAFD 

AFDACFDADFACFADAACAFAAM10000" 


し ょ うい 


れ ば な ん と か な る と 思い ます (30 面 越え る 
ょ 楽に な る よ /)。 


照準 BASIC UA F 2 ピピ 80 


Е 


( F —v o5) 
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pio 


照準 BASIC リ スト 
$18 LOCATE 1,13:PRINT"Hit RETURN 


Key!" 
439 IF ІМКЕҮФ=СНЕФ ‹ 13) THEN RETU 
RN 


648 GOTO 430 

$58 REM XXXXXX GAME OVER XXXXX 
660 LOCATE11,7:PRINT “GAME OVER" 
678 PLAY "г41503604С.В64С8864СЕО 
.CBDECR44CEGA2R4" 

690 PLAY "AG.ES8RS4ECD.C8DEC.O3A8 
Ré4AaGO4C2R4" 

695 IF S»HI THEN HI=S 

696 5=0:Т1=0 :М5=0 

700 FOR О=@ ТО 1880:NEXT:GOTO 11 
8 


710 REM XXXXX ӘҺ7/7 XXXXXXXXXX 
720 IF N<19 THEN 450 

740 KM-KM*1:KTz-KT*1:L-L*1 

750 IF KT=? THEN KT-9?:KM-8 

795 CLS 

768 LOCATE11,9:PRINT"LEUEL : " 5L :N 
=0 :TI=80 

778 FOR C=0 TO 1080:NEXT:GOTO 12 
9 

780 REM XXXXX 2525 XXXXXXXXXXX - 
798 LOCATE11,9:PRINT “ISSN TO 
FOR 1=@ TO 1000:NEXT:CLS:END 


道 を アル ファ ベッ ト の 形 を し た 敵 が 通る 
の で , 敵 と 同じ アル ファ ベッ ト を 24 個 ある 
箱 の 中 か ら 探 し て や っ つけ る と いう ゲー ム 
で す . 

文 ミ ニ PiO イ ン フ ォ メ ーション 


実行 する まで | リス ト ど お り に 入力 し て RUN. 


評 スピ ー デ ィ だ し 。 アイ デア が な か な 
総 か いい で すね . 


ЖОЛ 


RUN す る と タイ トル ヒ と 操作 キー が 表示 


ж 2,1,0 
110 отне , A CONSOLE? L8 1 CLEAR 
120 PRINTCHR$(12):DIMA$ (22) 

120 H$-"PC-8001":4-21:FORI-1TO4 
140 A$-CHR$(VAL("£&H'"-HEX$ (NOTA-256))) 
150 I$-I1$4A$:A-A*4:READX (I) , YCI) : NEXT 
160 50508890: GOSUB900 

170 COLOR7:LOCATE7,2 

171 PRINT"HIGH SCORER-";H$ 

179 COLORé:FORI-4TO21STEP17:LOCATEQO, I 
180 LOCATE, I: PRINTSTRING$ (28,149) 
190 NEXT:COLOR2:LOCATE10,21 

200 PRINT" HIT АМҮ KEY'' " 

210 CONSOLES , 16:LOCATEO,5 

220 RESTORE270:FORI=0TD4:READA,B,C 


240 FORJ-OTO70: IFINKEY$< »""THEN410 
250 NEXT: IFC>0@THEN2Z0 

260 NEXT:FRINT:FRINT:GOTO220 
270 DATA 4,7,4,"SFEED" 

280 DATA "ーー エー エコ ロコ ーー —.+ + +" 
290 DATA "トー 1 1 | — EI" 
"o DATA t UA U Al Ness aD A a 
310 DATA 4,24,1,"GAME" 

320 DATA 7,10,1,"KEY FUNCTION" 
550 DATA 5,10,7," m” 

340 DATA " IB I" 

550 DATA "ーー ロイ オー コー —— " 

560 DATA "14 ト H61 ISPACE I" 

370 DATA "トー オー キー اا‎ 


町 田 市 暗 虎 


220 READA$:COLORA: PRINTSFC(B) ; A$: C2C-1 


ай, 何 か キ ー を 押す と ゲー ム が スタ ー ト 
し ます . する と 画面 中 央 で 数 字 が 回 b 始め 
ます . 適当 な キー を 押し て くだ さい. その 
と き の 数 字 が その 面 で の 敵 の 数 で す . 
画面 に 現われ た だ 24 個 の 箱 の 中 に は , A~ 
XX の アル ファ ベッ ト が 隠 き る きれ て いま す . 
[8 [2|[4|[@| キ ー で 人 開い て いる 箱 の 上 下 
пао ОРОНОТ, 左 の 道 を 通 
っ て いる 敵 の アル ファ ベッ ト と 合わ せ た だ た ら 
[SPACE キー を 押し て くだ さい . する と, 
その 敵 は 死ん で まだ 新しい 敵 が 出 て きま す . 
そし て 決ま っ だ 数 の 上 敵 を 倒せ ば 次 の 面 に 


DATA " 121" 
390 DATA " =" 
400 DATA 6,10,1,"TEN KEY SHOOT" 

410 CONSOLEO,25:98-0:F-0:V-22: 50508890 
420 COLOR7:LOCATE12,8:PRINT"START' !" 
450 FORI-0TO223:4$(I) -CHR$ (45+1) : NEXT 
440 FORI= の TD2 さ : FDRJ= の TO1 : GDSUBBB の 

450 B(J) =G:NEXT: SWAPAS (E (2)) ,A$ (BC) 
460 NEXT: 50508890: FORI-1TOSSTEP2 

470 LINE(I,2)-(I,V) ," I" , S1 NEXT 

480 FORI-1TOVSTEPV-1 

490 LINE(1,I) - (5,1), "8" ,5: МХТ 

500 C-6:FORL-9TOSASTEPS 

510 РОКК=2Т0175ТЕР5: GOSUBB8ZO: NEXTK ,L 
520 C-1:E-RND(1)*1Q0*S5:LOCATE14,10 

550 GOSUB810:PRINTUSING"ENEMY = ##";E 
540 IFINKEY$-""THENS2O0ELSEFORI-OTOSOO 
550 NEXT:LOCATE14,10:PRINTSFC (10) 

560 X-0:Y-0:4-0:M-2:T-100 

570 C-2:60SUB820: GOSUBB40: 560508870 

580 50508900: ҒОКВ=0Т05 

590 ІҒІМР (9) < >1910КА$Ф (А) < »A$ (6) ТНЕМЫЗФ 
6 の の E-E-1:8-8-19-M:C-1:FORB-OTO10 

810 GOSUBB1 の : NEXT: IFS >HTHENH=S ェ F=1 

620 IFE> の THENGDSUBB7 ア の: M=2ELSE770 

650 I-INSTR(IS,CHR$(INP(Q)ANDINP (1) ) ) 
640 X1=X+X (1) :Y1=Y+Y(1) : IFI= の THEN68 の 
650 IFX1< の 0RX 1 >5DRY1< の DRY1 > さ THEN68 の 
660 GOSUBB10:C-5:G0SUB820: X=X 1 : Y-Y1 
C-2:0-2Y*6*X: GOSUBB20: GDSUBB4 の 


PIO ёки аг, 
302 LLUSTRATION 


新潟 県 佐渡 < グン 


“V" は どこ に あっ た っ り け ? 


移り ます ( 敵 の 動く 距離 が 短く な る ). X 
イム が な く な る か 。 敵 に 一 番 下 まで 来 ら れ 
る と ゲー ム ・… オ ォ オーバー で +. 


PS. 


PC-8001 で も この よさ "E Бак: dios wie Ээ 
クタ の ゲー ム な ら 他 の 機種 と 変わ りあ り ま 
x^, 8001 を 骨董 品 と バカ に し て いる 和田 
% 1 年 前 か が ら FM-7 を 買う と 言っ て いな 
が ら ま だ 買っ て も いな い の に ,。 人 に 文句 を 
は まだ まう 


スピ ー ド ・ ビ ピッ タ シ ゲ ー ム BASIC リ スト BINE 


480 NEXT: IFMsV-10RT-ÜUTHEN710 

590 р=52: 60508860: М=М+1:Т=Т-1 

700 D=ASC (A$ (G) ) : 560508860: 5070580 

710 COLORZ2:LOCATE2,M: PRINT "x" 

20 C-1:FORJ-0TO100: GOSUBB10: NEXT 

730 COLOR6:4$-"GAME OVER" 

740 IFT-OTHENA$-"TIME UP''" 

750 LOCATE15,8:PRINTA$ 

5 IFF-1THENGOSUB910 

FORI-O0TOZOQQ0: NEXT: GOTO! 60 
GOSUBB9Q: COLOR7: LOCATE? , 7 
PRINT"NEXT STAGE! ! " :LOCATE10,9 
PRINTUSING"BONUS 449Q";T 
8284T:V-V-1:GOTO44Q 
BEEF 1 : FORN-OTOC: NEXT: BEEPO: RETURN 
L=X*5+9: K=Y*5+2 
LINE(L,K)-(L*2,K*2) ,"I",C, BF: RETURN 
COLOR7:LOCATEL +1 ,К+1 
РКІМТАФ (А) : RETURN 
FDKE&HF さ の 6+M* 1 20 , D: RETURN 
LINE(2,2)-(2,U-1)," "。RND(1 ) #4+3 
G-RND (1) #23: RETURN 
LINE (0,1) 一 (3 日 。24) ," ",BF: RETURN 
COLOR7:LOCATE1,Ø:PRINTUSING"HIH#####0 

0 SC#####00 TIME### ENEMY ##";H;S;T;E:RE 

TURN 

910 COLORS:LOCATEQ, 12:PRINTSFC (28) 

920 LOCATEB,12:INPUT"ENTER NAME ";H$ 

950 H$=LEFT$ (НФ, 10) : RETURN 


Si lr тт 
ТЯ ; 


岩倉 市 りょう 


3 月 号 p.151 の PiOBOX の 「Y.E. C. 柿崎 景 二 」 さ ん へ . 少し お なこ が まし すぎ る か と は 思い ます が 、 何 か の 役に立て ば と 思い 書き ます . 
プロ グラ ム を 見 る と 「 高 速 」 と いう に は 少し 無駄 が あり ます . $BA2C 以 降 で G-RAM の 内 容 を レジ スタ C に と ос, レジ スタ A の 値 に より レ 
ジス タ C の うち 1 ビッ ト を モット し 、G-RAM ヘ へ スト ア す る 方 法 を と っ て いま す が 、 
| С. l'SETn. (НІ) 」(n= ニ 0 一 7) と し た ほう が 良い と 思い ます . また 「CP 0」 は 「OR A」 ま た は 「AND 人 A」 の 1 バイ ト で 代用 する こと が で き 


「(HL)」 自 体 が レジ スタ 同様 に ビッ ト の 制御 が で きる の 


Дә, 


ここ は PC プロ レス ・ ホ ー ル で す . Ж 
防衛 の た め に 来 ま し た . さぁ ゴン グ が 鳴っ 
ў کو‎ 


* 


ミニ PO インフ ォ メ ーション 


| リス ト ど お り に 入力 し て RUN. 


スピ ー デ ィ な の は いい けど , 技 の 選 
択 を も っ と ゆっ くり で き て も いい ん 
じゃ な いか な ? 


遊び 万 


RUN す る と 名 前 を 聞い て くる の で , 12 
文字 以内 で 入力 し て 《 く だるい. 1 の よう 


な 画面 が 現われ ます . プレ イヤ ー は 左下 の 
レス ラー で , 図 2 の よう に 操っ て くだ さい . 
そし て , 相手 の レス ラー と ピッ タリ 重なっ 
た と き に | SPACE キー を 押す と , 技 が へ 
ッ ド ロッ クー キッ クー チョ ッ プ ーー… と 変わ 
る の で , [SPACE キー を 離し て くだ きい. 
技 が うま く か か っ だ と き は 技 の 感 力 の 分 
だ け 相 手 の ス タ ミ ナ か が 減り ます (相手 に か 
けら れ だ た と き は 自分 の スタ ミナ が 減り ま 
з); そし て スタ ミナ が 0 以下 に な れ ば 負け 


CT. あな だ が 勝て ば 防衛 し た こと に な り , 


REM ¥ ¥ ¥ € E E E E E E E E E E HE PE 4€ € 3 AE € ¥ ¥ 
20 REM * + 
30 REM * PC フ * ロレ ス * 
4@ REM * ° * 
50 REM ж MORI & NAKANURA * 
60 REM ж Li 
70 REM 3JdXXJJX 3 (€ (9 E 4€ HE E € 9 € 


DIM МФ (10) ,B$ (10) 
CONSOLEQ, 25,0,1:WIDTH40, 25 
100 PRINT СНКФ (12) ; 
110 LINE (0,0) – (56,20) , "Ш" ,5,В 


120 СО ОККМО (1) #7+1:1 ОСАТЕЗ, 6: PRINT "B 
айшы) | | 3 B ————— —B" 

150 СО ОККМр (1) ж7+1:1 ОСАТЕЗ,7: PRINT "B 
m a s и. —B" 

140 COLORRND(1)*7*1:LOCATEZ,8: PRINT "M 
m ш ш. —— — BR" 

150 COLORRND(1)*7*1:LOCATES,9: PRINT "E 
mm m оиз B m" 

160 COLORRND(1)*741:LOCATEZ,10: PRINT "M 
m m [ELA e Hv ka w, 

170 COLORRND(1)*7*1:LOCATEZ,11: PRINT "В 
чы | РС フ 2" ロレ ス F 


180 COLORRND (1)*7+1:LOCATEZ,12: PRINT "= 
—— rr Uc r 


185 A$="";M$="" 

190 COLOR&é:LOCATE9,14,0:PRINT"YOU NAME ( 
MAX212) "; :A$- INPUTS (1) : IFA$=CHR$ (12) THEN 
200ELSEM$=M$+A$ : L=LEN (M$) : IFL >11THEN2 の の E 
LSEPRINTM$;:GOTO 190 

200 LOCATEO,0,1:PRINT CHR$(12); 
FORI-1TO10:READW$ (I) : NEXT 

FDR 1 = の T ロ 7: КЕАРВФ (1) : NEXT 
GOSUB240:GOTO 320 

LINE (0,0) - (40,22) ,"B", 1,B 
LINE(1,4)-(27,4) ,"—",1 
LINE(1,2)-(37,2) ,"—",1 
COLORI:LOCATE15,1:PRINT"] J I"; 
COLOR1:LDCATEl16,2:PRINTu3—— 
COLOR1:LOCATE16,Z:PRINT"I 1 1"; 
COLOR1:LOCATE16,4: PRINT " 2——" 
RETURN 
F21:X-22:Y7218: V920: Z=7: SP-20: SC-30: B= 
30: = の 

330 LOCATES,3: СО ОКЗ: PRINT M$;:LOCATE24, 
3: COLOR4: PRINTB$ (RND (1) +8) 

540 LOCATEV,Z-1:COLORA4:PRINT " " 

550 LOCATEV,Z:COLORA:PRINT " vev " 


£d. それ か ら $SBA71 で リタ ー ン し て いま す が , その 前 に 割り 込み 許可 (ED を する で き で す ( 特 に PC は ). 
LD B. A/INC B/LD A, 1/LOOP3 : RRCA/DJNZ LOOP3/OR (HL) /LD(HL), A/OUT(5FH), A/EI/RET 


72 6v»? 


一 段 と 強い 相手 と 対戦 し , 負け れ ば 即 ゲ ー 
ム ・ オ ー バ バー です. 


Рз. 


技 を か けた の に 技 の 名 が 表示 る れ な いと 


き が あり ます が , 


これ は バグ で は な く 技 が 


か か ら な か っ だ の だ と 思っ て くだ さる い . 


ヘッ ドロ ッ ク 
パンチ 

キッ ク 
チョ ッ プ 


タッ クル 
ヨン ノ ジ ガ タメ 
プレ ン バ ス ター 
バイ ルド ライ バー 
ラリ アッ ト 
コプラ ツイ スト 


сос со No の + CO = 


ーー 
с 


ik: 本 物 の プロ レス と は 多少 異な る こと が あり ます . 


LOCATEV,Z*1: СО ОКА: PRINT" 
LOCATEV,Z*2: COLORA: PRINT" c " 
LOCATEV , 2+5: COLOR4: PRINT" " 
LOCATEX,Y-1:COLORZ:PRINT " ? 
LOUCATEX , Y: COLORS: PRINT Я 
LOCATEX,Y*1: COLORS: РКІМТ " 
_ОСАТЕХ ,Ү+2: COLORS: РКІМТ " 
(ОСАТЕХ,Ү%2: COLORS: РКІМТ " u 
COLOR4:LOCATE34,1:PRINTUSING"###"; SC 
COLORZ:LOCATE1,1:PRINTUSING"###"; SP 
LOCATE1,23: PRINTUSING"SCORE : ####" ; 5 
LOCATE20,22: PRINTUSING"HI-SC: ####"; H 
I=INF(1):J=INF (0) 

IF X=VANDY=ZTHENGUSUB61 の 

IFJ=251ANDY< 18THENY=Y+1 
IFI=254ANDY>6THENY=Y-1 
IFJ=239ANDX>3THENX=X-1 
IFJ=191ANDX で 3 の THENX=X+1 

R=INT (КМО (1) +4) : BEEF 1 : BEEF の 
ONRGOSUBS790 , 580, 590 , 600 

GOTO 340 

ІЕ2< 1ВТНЕМ2=2+1 : RETURN 
ІҒ2>6ТНЕМ2=2-1 : RETURN 

IFV* さ THENV= ソ ー1 : RETURN 

IFV く 3 の THENV=V+ 1 : RETURN 

R=INT (RND( 1 ) +10) : CODLDR4 
LOCATE24,1:PRINT" 7 
LOCATE24,1:PRINTW$ (К) 
LOCATE20,1:PRINTUSING"4V";R 

ЗР=5Р-К 

FORI-QTO200 

1=INF (9): IFIZ191THENPzP-*1: IFP-11THEN 


) {° 


BEEFO: COLORI 
LOCATES,1:PRINT" ka 
LOCATES,1:PRINTWS$ (Р) 

BEEP1: 

NEXT 

LOCATE17,1:PRINTUSING"&S";P 
FORI-ZQTO1Q000: NEXT 

BEEF の 

5С-5С-Р 

Sz8*P: IFS»2HTHENH-S 

LOCATE1,23: PRINTUSING"SCORE : ####" ; 5 
LOCATE290,23: FRINTUSING"HI-SC: ####"; Н 
IFSC= く の QANDSP= く の THENB5 の 
IFSC= く の THEN9 の の 
IFSP= く の THEN さ の 


ブッ チョ ー の パイ ルド ライ バー は きつ か っ た 


図 1 スタ ー ト 画面 


プレ イヤ ー の コン ピュ ー タ の 
技 の 名 i gygy 技 の 威力 と 技 の 名 


SCORE : HI- SCORE : 


ハイ ・ ス コア 


操作 キー 


図 2 


850 Р=@ 
840 RETURN 

850 LOCATE15,12:PRINT"CtT27" 
860 COLORS: LOCATEX-2,Y: PRINT" 
R4: PRINT" 4 <" 

870 COLORS: LOCATEX-2,Y*1:PRINT" &H"::CO 
LOR4:FRINT" He" 

880 COLORS:LOCATEX-2,Y*2:PRINT"  -^*"s:CO 
LOR4:PRINT" - '«":GOSUB1070:GOTO 970 

890 LOCATE15,12:PRINT"7772 n»*"::GOTO 1010 
900 COLOR4:LOCATEX,Y:FRINT" >- г "; 

910 LOCATEX,Y*1:PRINT" oO "; 

920 LOCATEX,Y*2:PFRINT" ラッ マト "; : 5605081070: 
GOTO89QTE15,12:PRINT"772 NF"; :GOTO 1010 
COLORS: LOCATEX , Ys PRINT" "3 
LOCATEV,Z*1:PRINT" HH "; 
LOCATEV,Z*2:PRINT" -% "; : 605081070 
_ОСАТЕ 15,12: РКІМТ "777 7" 
LOCATE13,14:PRINT"YOU SCORE: "; 5 
LOCATE10,15:PRINT"tOÓ4*h" チョ ウ セ フシ マス カリ 
I$-INPUT$(1): ІРІФ< > "п" ТНЕМКЕЅТОКЕ : GO 


っ "3:3 COLO 


э 


1000 END 
1010 BEEF:BEEF1:BEEPO: LOCATE15,13: PRINTF 
"ЛА жога セイ コウ "“ 

1 の 2 の LOCATE15,15: PRINT" — ーー ヘーー" 

10:0 LOCATE15,16:PRINTUSING"— 1# |—";F 
1040 і ОСАТЕ 15,17: РКІМТ " — — —" 

1050 SP=SP+30: B=B+10: SC=B: X722: Y218: Z27:V 
-30:F-F*1:I$-INFUT$(1) 


1060 FRINT CHR$(12)::G0SUB240: GOTO 330 
1070 FORI-1TO3 

1080 ВЕЕР: ONIGOTO1090,1100,1110 

1090 COLORI:LOCATE7,7:PRINT"2-»5! "; : БОТО 
1120 

1100 COLORI:LOCATE7,7:PRINT"'"^5-' "$; : БОТО 
1120 

1110 COLORI:LOCATE7,7:PRINT"23U4-'"$ :FORJ: 


= の TOU5 の の : BEEF 1 : BEEFØ: NEXT 

1120 ҒОКТ-070100:МЕХТ:МЕХТ 

1130 RETURN 

1140 DATA^wh"Dw7,1? 25, #97, 397° 。 ダ タッ プル ,3»/ 
"p" タメ 27 LNT RI- A ТАК" 941 7,5079 h,22"7 ラリ 
ャ マト . 
1150 DATA ア ンチ ョ ニオ 1/9, VN リル ^'-m 25,29» 
"フン セン 。 フ "リッ チョ ー 。 ア フト レー ミド ァ イ ァ ント OIF OY 727,9 
4n"— マスカット 


P.S. $BA2C 以 降 を 次 の よう に 


(し ず 姫 退場 ) 


оо 


$£—7-7^^57532v--.- 


PiO"84 年 12 月 号 に , FP-1100 の 忍者 パ ズ 変 数 表 
ル が 載っ て いま す . これ は PC 版 で す . 
PC 版 で は , 金 な ら ぬ |Al| を 外 に 出し て く 


な お , [F1 | キー で 最初 の 画面 に な り ま 
T. また , 入力 は 必要 な キー し か 受け 付け 


だ さい . キャ ラク タ は 大 き な 四 角 の A, fi K、Y、 し | 57-288, 5 | ませ ん . 
長 の ピー ナッ ツ , 横長 の 某社 製 飛行 機 , 小 ` 面 の 種類 р S 
さ な 四 角 の ダン ボー ル 箱 と な っ て いま す . эмы, | 消去 用 ° ° 


この ゲー ム に は 最短 手数 ほし いう の が あり 
š+. それ が 何 手 か は 別に し て , プロ グラ 
ム も 短く し よう と し て 。 何と ./ РСЖ» 
駒の 種類 ラー モー ド な る な ぢ の に な つて し まい まし た 
手数 …。 RUN し だ た と き の 画 面 は 白黒 で す が , 


パズル は 2 種類 あり ます . 
жұ = РОХ иу жх ма 


実行 する ま て | リス ト ど お り に 入力 し て RUN. 


総 評 27274v»2*'*/UuU': 0c, 板 の 
形 が な か な か 面白 いで すね . 


駒の 形 GET, PUT 用 


遊び 方 . 雑用 コマ を 動か す と 色 が 付き ます . 
ける 場所 に 移動 し ます . 移動 先 が 2 つ 以上 3 参考 文献 
入力 は , 動か し た い 駒の アル ファ ベッ ト ある と き は , 震 が 鳴っ て 方 向 入力 に 移り ま 1) スパ ゲッ ティ ・ ナ ポリ タン : “忍者 パ ズ 
を 小文字 で 入力 し て て ださい. Tok, Bh | +. 方 向 は [3][4][6 [| て です. мур MERA 


A BOX BASIC UJ д йй рн анана  (у( ирани N 


DIU NEN yanapasqan apa Алсан ASS 730 IF I THEN IF Ізі THEN 760 ELSE GOSUB 
420 COLOR7:LOCATE25,1:PRINT" "sCHR$(29); ||490 ELSE 420 


:К=А5С (ІМРОТФ (1) ) -97:ІЕ К=-88 THEN 50 740 

450 IF К<0 ОК K>18 THEN 420 750 ON L GOTO 420,750,770,780,790 

440 PRINT CHR 和 (65+ ド ) : X= ニ の 760 IF A(X,Y*1)24 THEN YYz1:GOTO510 
450 FOR 2-5 TO 1 STEP -1:FOR I-4 TO 1 ST 770 IF А(Х-1,Ү) =4 THEN ХХ--1:6070510 
EP -1:IF A(I,J)K THEN X=I:Y=J 780 IF А(Х%1,Ү)-4 THEN ХХ-1:06070%510 
460 NEXT I,J:IF X THEN Х@=(Х-1)#4+1:Ү@=( 790 YYz-1:60TO510 

Y-1)*4*1:XX-0:YY-0 ELSE 420 600 ' C,H,M -------------------------- 
472 COLOR к MODS*3:0N K MOD5+1 GOTO 910, 810 X1-zX0*7:Y1-Y0O-«-:2:GOSUBSSQ 


560,800,670,420 820 IF ACX,Y*1)-4 AND А(Х%1,Ү%1)-4 THEN 


488 ' sub ーーーーーーーーーーーーーーーーーーーーーーーーーーーー YY=1: SWAF AA(X+1 。Y) 。A(X+1 。Y+1 ) : GOTOS10 
490 BEEP1:BEEPO: LOCATE25,4: I-ASC ( INPUT$ ( 830 IF А(Х,Ү-1)-4 AND A(X+1 。Yー1)=4 THEN 


N し = の 840 IF A(X-1,Y)24 AND A(X+2。Y)<>4 THEN B 
500 L-L-*1: RETURN 90 


510 SWAP A(X,Y),A(X+XX,Y+YY) 850 IF А(Х-1,Ү)<>4 AND A(X*2,Y)24 THEN 9 
520 PUTe(XO, YO) - (X1,Y1) ,SrPUTG(XO*XX*4, Y || go 

Q«eYY*4) -CX1*XX*A4, YI *YY*4) ,G 860 IF A(X-1 。Y)=4 AND A(X*2,Y) =4 THEN GO 
550 IF KK<>K THEN KK-K:N-N*1:LOCATE24,7: ||SUB490 ELSE 420 

PRINT N 870 ・ 

540 GOTO420 880 ON L GOTO 420,420,890,900,420 

550 GETG(XQ, YO) - (X1, Y1) ,G: RETURN 890 XX=-1: SWAP A(X-1,Y) ,A(X*1, Y) : GOTOS20 
560 ' B,G,L,Q ------------------------ 900 XX-1:SWAP A(X。Y) ,A(X*2, Y?) :60TOS520 
570 Х1=Х0+5:Ү1=ү0+7: 50508550 910 ' А ------------------------------ 
580 IF A(X*1,Y)24 AND A(X*1,Y*1)24 THEN 920 Хі-Х0%7:Ү1-Ү0%7: 650508550 

XX=1: SWAP A(X,Y+1) 。A(X+1 。Y+1 ) : GOTOS10Q 950 IF X-2 AND Y-4 THEN 990 

590 IF A(X-1,Y)24 AND A(X-1,Y*1)24 THEN 940 IF А(Х%2,Ү)-4 AND A(X*2,Y*1)24 THEN 
XX=-1: SWAP А(Х,Ү%1),А(Х-1,Ү%1):6070510 XX=1: SWAP A(X。Y) 。A(X+2。Y) :SMAP A(X,Y+1), 
600 IF A(X,Y-1)<>4 AND A(X,Y+2)=4 THEN 6 ||A(X*2, Y*1) : 5070520 

52 950 IF А(Х-1,Ү)-4 AND А(Х-1,Ү%1)-4 THEN 
610 IF А(Х,Ү-1)-4 AND A(X,Y*2) <>4 THEN 6 ||XX72-1: SWAP А(Х+1,Ү),А(Х-1,Ү) : SWAP. A(X+1, 
60 Y*1) ,A(X-1,Y*10 : GOTOS20 

620 IF A(X,Y-1)=4 AND A(X。Y+2)=4 THEN GO ||950 IF A(X。Y+2)=4 AND A(X+1,Y+2)=4 THEN 
508490 ELSE 420 ҮҮ=1:5МАР A(X。Y) ,A(X,Y+2) :SMAP A(X+1,Y), 
оза ' A(X+1,Y+2): GOTOS2Q0 

640 ОМ L GOTO 420,250, 420, 420 , 640 970 IF A(X,Y-1)=4 AND A(X+1,Y-1)=4 THEN 
650 YY=1:SMAP A(X,Y) 。A(X。Y+2) : GOTOS20 YY2-1:8WAP А(Х,Ү-1) ,ACX, Y*1) : SWAP A(X+1, 
660 YY=-1: SWAP А(Х,Ү-1),А(Х,Үж1):60Т0520 || Y-1) 。A(X+1 。Y+1) : GOTO. 520 ELSE 420 

670 ' D,I,N,S ーー ニー ニー ご ご ーーーーーーーーーーーーーーーーー 980 ' end ーーーー ニ ーー ニーーー ニ ーーーーーーーーー ニ ーー ニニ ー ニ ーーーーーー 
680 X1=XØ+3: Y1=YØ+3: GBDSUB55 の 990 LOCATES,13:PRINT" ":РИТ@ (5,14 
690 IF А(Х,Ү%1)-4 THEN I-1 ELSE 1= の )- (12,22) ,G: LOCATE20,9: PRINT "オッ リカ レ サ マ 。 "まし 
700 IF A(X-1,Y)24 THEN 1=1+1 OCATEO , 22: COLOR7 
710 IF A(X+1 。Y) =4 THEN 1=1+1 
720 IF A(X。Y-1)=4 THEN I=I+1 


10 ' А Box 
20 CONSOLEQ,25,0,1:COLOR7,0,0:WIDTH4Q, 25 
:DEFINT A-Z:DIM A(5,6),G6(4Q) ,S (40) 

50 INPUT"1 or 2 ";B 

4 の ・ 

50 N= の :PRINT CHR$(12);:1F B=2 THEN RESTO 
RE 80 ELSE RESTORE 70 

6 の FOR Y=1 TO S:FOR Х=1 TO 4:READ A(X。Y) 
:NEXT X,Y 

70 ратаі ,0,0,6,1,0,0,6,5,2,2,8,7,7,12,12 
,15,4,4,18 

80 рата: ,0,0,2,1,0,0,6,11,2,2,16,11,5,8, 
16,13,4,4,18 


100 PRINT" | ,—— —— ーー | (a-s) 

110 PRINT"!IBB!I AA 116611 

120 PRINT"IIBBII А A 116611 8 

150 PRINT"! '« ご IA Al 1 (4*5) 

140 PRINT" | Z ^ IAAAAAAT — "` | 2 

150 PRINT" I IBBI IA AlIGGII 

160 PRINT" I IBB I IA AlIGGII No. 0 

170 PRINT" | '—^ ーー — | 

180 IF B-2 THEN 280 

190 PRINT" I 

200 PRINT" | 

210 PRINT" 

220 PRINT" 1 
| 
| 
I 


Юр! or ББҚ 1, 
DOT GET 


| — اة — 


230 PRINT" a Al 
240 PRINT" 
250 PRINT" 
260 PRINT" | —— a TA | 
270 GOTO360 

'280 PRINT" | —. ーー へ 
290 PRINT" I ILL 1 т 11 
500 PRINT" IILL I CC I ! 
510 РКІМТ" 1, м 
520 PRINT" | ^ `š —. — — いい 
550 PRINT" I ILL! IDD! HII I !QO 
540 PRINT"! ILL ! IDDI III ! !QG 
550 PRINT" | — ーー ーー 
560 PRINT" | — ーー 
570 PRINT" ! INNI 

PRINT" 


400 PRINT" —" 


か CSS 中 の 
PERSE 
OAS СҰ у 


- 


Q 
А. f 


寒河江 市 SHINYA 茨城 県 fandrula 大 和 市 OFF 
1 Q9 みな みり ょ うこ さん は , アウ シタ ン で も あっ た ん で すね . な ぜ か っ て ? ふっ ふっ ふ 。 実は OUT3 月 号 の 「 制 服 小 特集 」 と いう コー ナー に 
Èi 彼女 の イラ スト が 載っ て いた だ の で す ょ 。 ペン ネー ム こ を そ 「 埼 玉 県 ・ り ゃ まこ 」 と な っ て いた けど 。 あの 絵柄 は 明らか に りょう こき ん の も の で 


(火星 令嬢 の 夫 ・ 出 戻 始 ) 


(KO) 
О! 2%, あり まし た だ た. -netZ4MLLC, PiO の 常連 が どん どん アウ シタ ン 化 する の で は …? PS Г( り 〇 む レ 〇 ン 」 は すっ ご く 面 白い Z 


+7: 37: 38 Sk C BASIC L b h D # vx 4 
Unr, 一 生 懸 命 作っ て み ま し た . 自分 で 遊び 方 ム ・ オ ォ オーバー です. 


は 割 と いい と 思っ て いる の で , 暇 な 時 に で RUN き る せる と タイ トル が 表示 され る の p S 

も 入力 し て 遊ん で くだ さい . C, [RETURN キー を 押し て くだ さい . + T 

廊 ミ ニ PiO イ ン フ ォ メ ーション 5L. 絵 が 描か れ て スタ ー ト し ます . X —vBASICC, し か も LIN 選 文 が 多い 
行 する まで | リス ト どおり に 入力 し て RUN。 | "うき "( 較 ) が 上 下 し て いる の で , 沈ん だ Unt. ぜひ 和信 力 し て みて くだ さい . これ 
o Imt, “うき "の 処理 が いい て す と き を 見 計ら っ て | SPACE キー で 釣り 上 か ら は も っ と 面白 い 物 を 作ろ うと 思っ て い 
総 評 | ね , で も , も う 少 し 本 物 に 近づけ て ИТЕР; às 


ほし か っ た な . жа, 50 点 以上 また は 一 30 点 以下 で ゲー 


НОНО о сае ВАССА НЕО ЕНОРИИ 


CIRCLE (209,125) ,7,5 2,120) ,7:CIRCLE (110,100) ,5,7,, ,2:PAINT(1 
220 LINE (0,40) - (400,40) ,S:LINE (300,20) -( || 00,110) , 6,7: LINE (94,105) - (105,105) ,3 
210,17) ,Q:LINE(310,17) - (317,22) ,Ø:LINE(3 || 380 РАІМТ (110,100) ,5,7 

17,22) -(324,17) 。 の し TINE (554,20) -(324,17), || 390 LOCATE 5$,20:COLOR S:PRINT"?*n, !! ^7 
の : し INE (300, 37) -(360,37) ,Z:L INE (300,37) -( || 77":А=-5:0050В 430:GOTO 150 

310, 40) ,2: LINE (360,37) - (350,40) ,2:LINE (3 || 400 LINE(100,120) - (95,122) ,6:11МЕ (95,123 
30,356) - (345,30) , 1, BF )-(90,120) ,&:LINE (95,124) - (90,120) 。6 


1 の 5=0:0=@:Р=1:С15 5 
20 WIDTH 80, 25: CONSOLE 0,25,0,1:LOCATE Š 
420: PRINT" "sCOLOR ё 

SB LOCATE 20, "SIPRINT" oo У 
40 LOCATE 20,  6:PRINT"! 
I 


50 LOCATE 20,  7:PRINT"I — + L 230 P=0:LINE (200,15) – (210,12) ,0:11МЕ (210 410 LINE (95,124) – (100,120) , 6:LINE(100, 12 
! e トス سے‎ | „12)-(217,17) ‚,@:1-1МЕ(217,17)-(224,12) ,0: 0)-(100,115),6 

0 LOCATE 20,  8:PRINT"! ! pro LINE(234,15) - (224,12) ,O:LINE (510,40) – (35 420 LOCATE 5,20:COLOR 6: РКІМТ"197° 7 トラ レタ 

| f7—3 4514 467 I 0,40) ,2:PAINT (320,39) ,2,21CIRCLE (355,25) ! 1": A=-2: GOSUB 430: GOTO 150 


430 LOCATE 62,5:828*A:PRINT"SCORE * * - "181 
ВЕЕР 1:FOR I=Ø TO S:NEXT:BEEP O:LOCATE 1 
9,22: PRINT "Hit RETURN キー" 

440 IF INKEY$< >CHRS$ (13) THEN 440 ELSE LO 


,5,71CIRCLE (380,20) ,8,7: PAINT (355,25) ,7, 
7:PAINT (3580,20) ,7,7:0=1 

240 ЕФ-ІМКЕҮ% 

250 IF P=1 THEN P=5 ELSE P=1 


70 LOCATE 20,  9:PRINT" I 
— I 

80 LOCATE 20, 10: РКІМТ" 1 —. 
Жы Lr cl I 


9 の LOCATE 20, 11:PRINT"I | _ || 260 U=INT(RND( 1 ) * さ )+1』 IF U= さ THEN 450 EL || САТЕ 10,22:PRINT" "s RETURN 
"E au gc I SE IF U=2 THEN 460 ELSE 470 450 LINE(100,120)0 – (95,125) , 1,BF:FOR I20 
1 の の LOCATE 20,12:PRINT" | — 270 IF E$-" " THEN GOSUB 3Q0: GOTO 290 TO 150:NEXT:GOTO 270 
perro tbe ! 280 CIRCLE (100,125) ,40,Р,,,.2:Ғ-Імт(кмр( || 460 LINE(95,120) -(100,122) , 1, BF:FOR І=0 


TO 200:NEXT:GOTO 270 

470 LINE(1900,120) - (95,125) , 6,BF:FOR 1=@ 

TO 250:NEXT:GOTO 270 

480 LINE (100,120) - (95,125) , 1, BF: LINE(97, 

120) - (92,123) ,2: LINE (92,123) - (90,120) ,2: 

LINE (90,120) - (85,125) ,2: LINE (85,125) - (B6 
4127) ,21:L INE (86,127) - (91,122) ,Z: LINE (91, 

122) - (93,125) ,21:LINE (98,122) - (95,125) ,21 

LINE (98,122) - (97,120) 。2 

490 LOCATE 5,20:COLOR 6:』PRINT" エ サ 727"7W": 

A-0:GOSUB 430: GOTO 150 

500 CLS 2:1F 5>50 THEN LOCATE 5,20:РКІМТ 

"ウマ イ YAN !'!":G0SUB S20: GOTO 550 

510 IF S«-30 THEN LOCATE 5,20:PRINT"^52' 
''"sGOSUB 520: GOTO 550 

520 LOCATE 8,22:PRINT"Try Again [Y/NJ":R 

ETURN 

550 IF INKEY$="Y" THEN 10 ELSE IF INKEY$ 

="N" THEN 540 ELSE 550 

540 END:REM By M.F 


1) #3) +1: GOTO 240 
290 IF U= さ THEN ささ の ELSE IF U=2 THEN 400 
ELSE 480 

500 Ү5=120: Үр=125 

510 FOR 1=@ TO 50:11МЕ (100,Ү5) – (95,Үр) ,6 
„ВЕ: YSB=YS-1 : ВЕЕР 1: ВЕЕР Q 

520 YDsYD-1:LINE(10O, YD*1)-(95, YD*1) ‚1:1. 
INE(100,69)-(100,120) ,7:NEXT I:RETURN 
330 IF F=1 THEN 540 ELSE IF Е=2 THEN 570 
ELSE 400 

540 LINE(90,110) - (95,106) ,7:LINE (95,106) 
-(98,108) ,7:LINE (97,117) - (990,110) ,7:L INE 
(107,110) - (102,106) ,7:LINE (98,108) – (102, 
106) ,7:LINE(107,110) - (105,117) ,7:LINE (97 
,117) - (92,120) ,7:LINE (92,120) - (108,120) , 
71LINE(108,120) - (105,117) ,7 

350 LINE(100,110)-(100,119) , 1: PAINT(1OQ, 
118) ,5,7: CIRCLE (95,110) ,2,0 

560 LOCATE 5,20:COLOR 7:PRINT"742 $2247" 
: =15: GBDSUB 430: GOTO 150 

570 LINE(100,105) (100,119) , 1: CIRCLE (100 
,105) ,8,7,,,- 13CIRCLE (100,120) ,8,7, ,,- 1: 

CIRCLE (100,120) ,8,0,5.14/4,3/4*5.14,. 1:L 

INE (108,105) - (108,120) ,7:L INE (92,105) - (9 


110 LOCATE 20,13:PRINT" “---------------- 


120 LOCATE 30,20:COLOR S:PRINT"HIT RETUR 
N KEY TO START" 

150 1%=ІМКЕҮФ 

140 IF I$<>CHR$(13) THEN 130 ELSE 150 
150 IF 5>50 OR S«-30 THEN 500 ELSE CLS:L 
INE (0,0) - (400,150) ,7, B: LINE (0,40) – (400, 4 
Ø) ,7:LINE(1,41) – (599,149) , 1, BF 

160 LINE(375,149) - (590,149) ,4: LINE (590,1 
49) - (100,50) 。4: し LINE (100,50) - (350,149) ,7 

170 LINE (215,90) - (100,50) , 4: LINE (575,149 
)- (100,50) , 4: LINE (100,120) - (95,125) , 6,B 

180 PAINT(98,123) ,6, 6: CIRCLE (100,125) , 40 
,5,,, 2: CIRCLE (100,125) ,80,5,,,.2 

190 LINE(109,50) - (100,120) ,7: PAINT (380, 1 
48) ,4, 4:LINE (242,100) - (100, 50) ,4 

200 IF Q-1 THEN 240 ELSE 1 ІМЕ (1,1) – (400, 
39) 。5 。BF 

210 CIRCLE (100,40) ,70,7,0,5. 14,. 2: CIRCLE 
(100,20) ,45,7,7/4*5.14,5/4*3. 14, .2: CIRCL 
E(100,7) ,20,7,7/4*3.14,5/4*3. 14, . 25: PAIN 
T (1 の の 。35) ,7,7:PAINT(100,20) ,7,7: РАІМТ (10 
0,7) 。7。7:CIRCLE (250,106) ,5,7,5/4*5. 14,0: 


Д aqa 


7/ つ ロマ ラコ ト 。 | 


* う ちの X11 は LXX. 
CMTON C 7 


du … 1 


ҒО) の アロ グラム 
て いて ARAL 
ウェ ー ム そる ep?) 


Ad: mr 
yu sum 


愛知 県 海部 純一 


豊橋 市 前 野 た だ し げ 


25 


な 一 ん に も 考え ず に 作っ た も の で す . Ж 
初 は オー ル BASIC の 3 倍 く らい 遅い ゲー 
ム で し た が , か じ り か け の マシ ン 語 の 練習 
に , と マシ ン 語 を 使っ て み ま し た . 

支 ミ ニ PiO イ ン フ ォ メ ーション 
リス ト ど お り に 入力 し て RUN. 


人 が 走る シー ン が いい で すね . で も 
た だ 走る だ け で は ちょ っ と 単調 で す 。 
プロ グラ ム 


マシ ン 語 で は , キー 入力 と 2 段 横 ス クロ 
ー ル , ネス コア 表示 鐘 加 算 ,。 エネ ルギー 表示 
を 行なっ て いま す . スコ ア 表示 多加 算 の と 
ころ で デー タ が 多い の は , 1 桁 に 1 バイ ト 使 
っ て 999990 上 いか な いよ うに し て ある た 


` 遊び 方 


RUN す る t, タイトル, 操作 キー が 表 
IRIN Т, “PUSH ANY KEY" が 横 に ス 
クロ ー ル し 始め だ ら 適 当 な キー を 押し て < く 
だ きい 。 ゲー ム が スタ ー ト し ます . 


20 REM JUMPING RUNNER 
50 REM 
40 LET M-$2000:REM M.L.WORK 
50 LET М-%2500:КЕМ M.L. SUB 
59 REM --- DEMO SCROLL --- 


%8С,2,%С0,%26,%Ғ6,%29 
70 GOSUB 1480 
80 CLEAR :DIM 4$(2) ,B$(2) ,0$(9) 
әмин 
)tNEXT I 
0% (8) 
54) 
,140,129,142) 
LET В% (2) CHR$(C,8,10,C,8,10,C) 
GOTO 690 
LET D-$85:LET F=$8Ø 
PRINT "JUMP ENERGY" 


D,F,D,D,D,D,F,D,D,D,D,$F0,$465) 


‚210 POKE ま 2 の の の 。 X 。Y: CALL $2500 
220 LET Х=РЕЕК ($2000) 

230 IF PEEK($201E) 
10) : MUSIC D ト ト U ト :LET E-Q:LET В-й 

240 IF Ү<2@ THEN LET Y=Y+1 

250 (ЕТ CURSOR-X1,Y1:PRINT B$(J*1); 


MUSIC 05:РОКЕ M*25,0,5:CALL М-%70 
=V- (V0) 


IF I$-CHR$($14) THEN GOTO 450 
500 IF 1$: >СНКФ (ФҒ7) THEN GOTO 260 
310 IF У>0 THEN POKE W, 32,32,32 
520 LET W-INT(Y*11)0*324X-J-1 
550 

(B£9): IF Ү<4 THEN LET Y=4 


290 


ET V-6 
250 FOKE M*25,B,0:CALL М+%7@ 


$EE80, 0,255 


&@ РОКЕ %5000,%СЕ,5,0,%46,01,%47,0,8, 


90 RANDOMIZE :LET C-32:LET Z$=" ト し ミ フ ソラ 
100 FOR Ісі TO 9:LET O$(I)?-MID$(Z$,I,1 
110 LET 0$(9)-"U"«O0$ (9) sLET 0$(8) »"U" 
120 LET A$(1)-CHR$(148,8,10,124,8,10,1 
130 LET А%(2)-СНК%(148,8,10,128,8,8,10 


LET ВФ (1) SCHR$(C,8,10,C,8,8,10,C,C 


PRINT SFC$(10) ; CHR$ (%45, $F3,D,D,D, 


200 PRINT :FRINT "SCORE-";SFC$(7);"PTS 


THEN LET Y=Y-INT(E/ 


260 CALL N«$FO:IF PEEK($3EQ)-$14 THEN 
270 LET W=W-(V>Q@)+(W<$2C@)*(J=1):LET V 


280 LET CURSOR-X*J,Y-3:LET I$-CURSOR$s 


LET YzY-(E/7):LET E-(E/X):LET B=B+ 


340 MUSIC O$(E):POKE W,$:0«*B,$20,920:L 


560 LET CURSOR-X,Y:PRINT A$(J*1); :POKE 


G ペ ン も 使っ て みて くだ さい 、. 
高木 人 きん 、 必殺 の サー クル を 作り まし ょ う . 


この ゲー ム は , ジャ ンプ し な が ら 地 雷 を 
よさ ける と いう 単純 な ゲー ム で す . 雲の上 に 
乗る と ボー ナス が 入り , 続け て 乗る と 点 が 
増え ます . 

ジャ ンプ ・ エ ネル ギー は ジャ ング し て 落 
ち て くる まで に 雲の上 に 乗ら な いと 70% ぐ 
らい し か 回 復 し ませ ん . 続け て ジャ ンプ し 
て いる と すぐ に な く な っ て し まう の で 注意 
し て くだ る い . 2/3 の エネ ルギー で 3/2 倍 く 
らい ジャ ンプ し ます . 

な お , 何 か を 踏ん だ と いう 判定 は 1 箇所 


さて , 雲の上 に 乗れ ます か どう か ? 


JUMP ЕНЕ Rey 
— — — 


SCORE =001660 PTS. 


370 
38g 
590 
4 の の 
の iLET 
410 


IF V=1 THEN POKE W,32,32,32 
FOKE М+25,0, (Ү>=20) : САШ. N+ ま 7 の 
LET Хі=Х:1 ЕТ Yi=Y 
LET J-(J-0):POKE $200B,E:CALL $254 
Е-РЕЕк ($200B) 
LET R=RND (10) 
420 IF К>В THEN FOKE $zFF,$14:GOTO 450 
450 POKE %2ҒҒ,%60:ІҒ К<1.8 THEN POKE $ 
2DE*INT(RND(722)*32,$F7,$F7: GOTO 450 
440 IF К<2.5 THEN FOKE $21E-*INT(RND(5) 
)*22,9F7,9$F7 
450 GOTO 210 
460 LET G-INT(Y*11) * さ 2+ ゴ +X sg LET CURSOR- 
X,Y: PRINT A$(J+1); 
470 FOR 1=@ TO 5 
FOKE G,$95:FO0R K-1 TO 50: МЕХТ に 
FOKE G,$14:FOR К=1 TO 50:МЕХТ К 
NEXT I 
LET G-X-«INT(Y*8) *324J-1 
520 FOKE G*96,0,2,0 
POKE 6%64,12,3,11 
FOKE G*32,2,4,11 
РОКЕ 6,0,12,0 
MUSIC TSQ2PFODBHhPF7DBh 
FOR I-Y-1 TO @ STEP -1 
LET CURSOR-X,I:PRINT "-":CHR$(8,10 
):A$ (1) СНКФ (8,10,32) ; 
590 FOR W-1 TO 70:МЕХТ W 
600 NEXT I:CLEAR 
610 РОКЕ M*25,0,0:CALL М%%70 
620 FOR Ісі TO 14:FRINT СНК6(2);:МЕХТ 


FOR Ізі TO 24:CALL まさ の の 9:NEXT I 
LET CURSOR-11,11:PRINT "GAME OVER 


630 
640 


650 LET CURSOR-8,16:PRINT "SCORE ";TAB 
(12); "PTS. " 

660 LET CURSOR-10,22:PRINT "PUSH ANY К 
EY":LET 7=@ 

670 LET 7-7%1: ЕТ I-ASC(INKEY$) 

680 IF (I-0)*(Z«200) THEN GOTO 670 

590 CLEAR :LET J= の :LET Х-100 

700 LET CURSOR-18,21:PRINT "JUMPING RU 
NNER"; 

710 FOR 

720 FOR 
EXT I 

730 FOR 

I 

740 LET CURSOR-12:PRINT "BACK FRO 
NT";SPC$(5); CHR$($BF,$85,$85);" JIRAI" 
750 PRINT "[,] — -- г.1";6РСФ(5);СН 


I=@ TO 168:CALL まさ の の の:NEXT I 
I=1 TO 14:PRINT CHR$(3,2,2)5:N 


I=$2C@ TO $2DF:FOKE I,$60:NEXT 


ゅ わ ー っ ./Nakkey さ ん に 続い て 一 本 木 密 さ ん も , お 絵描き 教室 と や ゃ や ら を お 書き に な っ た ん で すか . — KAS A / 
P.S. rainy ド ロッ プ さ ん の イラ スト っ て , か わい いで すね . 
P.S.3 0O ほ ど と 最高 な マイ コン 雑誌 は な い / 


きっ と 手放せ な く な る で し ょ うぅ う . 


で し か 行なっ て いま せん : し た が っ て , M 
の A の と き と B の と き と で は 判定 筒 所 が 違 
いま す . その だ た め う まく 雲 に 乗れ な か っ た 
b, 地雷 の 上 を 走り 抜け る こと が あり ます 
が 。 バグ で は な い の で ご 安心 を 。 

また だ , 雲 は 自分 が 通っ たり, 乗っ た りす 
る と 消え ます が , 高く ジャ ンプ する と き は 
上 まで 一 気 に ジ ャ ング する の で 消え ませ ん . 

踏ん だ と き の 判 定 箇所 ・ 


A в 
MOE 
El zE fil PH 


エネ ルギー の 表示 
スコ ア 表 示 & 加 算 
横 2 段 スク ロー ル 


フラ グ 

雲 の 得 点 

雲 の 得点 表 示 ア ドレ ス 
雪 の 得点 表示 タイ マー 
乱数 (0 一 10) 

人 間 の キャ ラク タ 


人 間 の キャ ラク タ 消 去 用 
X, Y 座 標 

ジャ ンプ ・ エ ネル ギー 

マシ ン 語 ワー ク 先 頭 ア ドレ ス 
マシ ン 語 サ プ 先 頭 ア ドレ ス 
人 間 が 踏ん だ も の 

ミュ ー ジ ッ ク ・ デ ー タ 


JUMPING RUNNER BASIC リス F BENE DINEM 


R$($7D);" (DANGER) " 
750 PRINT :PRINT 
$2D4,$14 
770 LET CURSOR-2,8:PRINT CHR$($F7,$F7, 
9,9,%Ғ7,9,9,%7В);" КОМО (MORE JUMP)" 
780 LET CURSOR-7,11:PRINT B$(J41); 
790 LET CURSOR-7,11:PRINT A$(J*1); 
800 LET J=(J= の ) : CALL $3000: CALL $:000 
810 FOR W-1 TO 70:МЕХТ М:РОКЕ $EE80,0, 
255 
820 IF АБС ‹ІМКЕҮФ) < >0 THEN GOTO 860 
8Z@ LET X=X+1:IF X«97 THEN GOTO 780 
840 LET CURSOR-15,21:PRINT "C PUSH ANY 
KEY 1"; 
850 LET 
860 FOR 


" JUMP  L[I(2?1":POKE 


X-0:GOTO 780 
Ісі TO 14:PRINT CHR$(2)::NEXT 


870 FOR Ізі TO 22:РБІМТ CHR$ (Z); : МЕХТ 


880 
890 


LET B-Q:LET V-Q:LET J-Q 

POKE M*20,0,0,0,0,0,0,0 
900 FOKE М+12,0 
910 LET E-Q:LET X-1:LET Ү=20:1ЕТ X1-X: 

LET Y1-2Y 
920 MUSIC T1PO:GOTO 170 
920 REM --- KEY IN SUB 
940 DATA ED,FO,QF,F5,20,00 
950 DATA 81,2C,26,04,C1,01 
920 DATA 27,12,54,F7,20,00 
970 DATA 20,0С,81,2Е,26,08 
980 DATA C1,1E,27,04,5C,F7 
990 DATA 20,00,Во,ЕЕ,С0,84 
1000 DATA 10,25,0Е,Ғ6,20,01 
1010 DATA C1,14,26,07,86,01 
1020 DATA B7,20,1B,20,02,7F 
1050 DATA 20,1в,29,00,00,00 
1040 КЕМ --- SUM AWASE 
1050 DATA 00,00,В0,04 
1060 REM --- ENERGY SUB --- 
1070 DATA В6,20,0В,8В,07,81 
1080 DATA 62,25,02,86,%2,В7 
1090 DATA 20,0B,5F,5C,80,07 
1100 DATA 24,FB,CB,04,F7,20 
1110 DATA 2В,86,01,В7,20,2А 
1120 DATA FE,20,24,86,60,47 
1150 DATA 00,08,5F,00,8C,01 
1140 DATA 1C,25,F8,:9,00,00 
1150 REM --- SCORE SUB --- 
1160 DATA СЕ,20,14,А6,06,Е6 
1170 DATA 05,А4В,04,47,04,81 

1180 DATA 04,25 

1190 DATA 05,80,04,07,04,6C 


サイ ン ペ ン も いい けど , 
P.S.2 必殺 


(根強い JR ユー ザー を 尊 散 する PS ユー ザー いっ まゆ ゅ う ・ お 一 は ら で し た ) 


is 


JUMPING RUNNER BASIC ! 2 F 


Qz,EB,O02,E7,03,C1 
1210 DATA 0А, 25,06,С0,0А,Е7 
1220 DATA Q02,6C,02,4F,A4B,02 
1220 DATA 47,02,81,04,25,06 
1240 DATA 80,04,47,02,6C,01 
1250 DATA АҒ,АВ,01,47,01,81 
1260 DATA 04,25,06,80,04,А7 
1270 рата 01,6C,00,46,00,81 
1280 DATA 06,25,0C,85,09,47 
1290 рата 00,47,01,47,02,А7 
1500 DATA 05,47,04,46,00,8В 
20,B7,01,66,46,01 
ВВ,20,В7,01,67,А6 


DATA 02,8B,30,B7,01,68 
1240 DATA 46,02,8В,20,В7,01 
1250 DATA 09,4%,04,8В,20,В7 
1360 DATA 01,64,86,20,В7,01 
1370 DATA 6в,29,00,00,00,00 
1380 REM --- SCROLL SUB --- 
1290 DATA СЕ,01,80,С6,20,6Ғ 
1400 DATA OO,BD,FO,0:,8C,04 
1410 DATA 00,26,Ғ6,В6,20,0С 
1420 DATA 88,01,B7,20,0C,27 
1420 DATA 05,СЕ,02,00,20,02 
DATA СЕ,02,С0,А6,01,А7 
рата 00,08,8C,02,FF,26 


1460 DATA Ғ6,29 

1470 REM -- M.L. WRIGHT -- 
1480 LET 5-0 

1490 FOR І-%2500 TO %261В 
1500 READ D$:LET D-VAL("$"«*D$) 
1510 РОКЕ I,D:LET S=S+D 


1520 NEXT I 

1530 IF 5<>%5800 THEN FRINT CHR ま (7) 』gFR 
INT "ERROR IN DATA":END 

1540 RETURN 


英 が 倒れ る シー ン を ショ ッ ト / 


これ は 体 当 た り し て くる 瑞 を か わし な が 進 . 
о, 決ま っ た 長 さ の コー ス を 走り 切る と い 2 …FP が 作る . ド の こと を 知っ て お か な いと , ゲー ムカ 
Бри ра 3 … 直 線 コ ー ス を 作る .。 つま ら な く な り ま す . 
文 ミ ニ PiO イ ン フ ォ メ ーション 4 … 前 回 と 同じ コー ス に する . コー ス 作 成 中 は , コー ス が 横 に な っ て い 


実行 する まで | リス ト と どおり に 入力 し て RUN 


遊び 方 
в pg | コー ス が 変え られ る な ど , š =PiO Өх —131] FFF - е 
! に し て は 凝っ て ます ね . 


KEDA, 赤色 が 敵 で す . そし て 表 い | @ ゲ ー ム 中 [5| キ ー を 押す と 危険 


突起 物 が コー ス の ふち に 当たり ます . 操作 たま に 自分 と 敵 が すり 抜け る 
RES で " " n У 
コー ス 作 成 Rimini DP AURA БИЙГЕ M Iiic bci ne 
始め に コー ス を 作る か どう か 聞い て きま で ジャ ジグ て す 。 ET も 起き 上 が ヵ 『 る 


т. 次 の 4 つの コマ ンド が あり ます . 2 
1 … 自 分 で 作る . [4][6] で 左右 , [s]c s 注意 点 


サイ クリ ンク BASIC リス | 2082 


НЕМ 260 ELSE 240 

220 BEEP:SCREEN 2,,4:PRINTCSR (МХ, 18) "® 
"s SCREEN 2,,2: PRINTCSR (RX, 18) ВФ (0) ; CSR (R 
X*RD, 19) B$ (6*RD) : ҒОКІ=0Т0500: NEXT: PRINTC 
SR(RX*RD,19)"  ":RX-RX-RD*2: BRX-RX 

240 SCREEN 2,,6:PLOT (L,102) : NEXT 

250 SCREEN 2,,4:PRINTCSR(MX,18) "O"1 SCR 
EEN 2,,5: PRINTCSR(12,15) "*«* GOAL ІМ! жж 
*":FORIZQTO20: ВЕЕРОМ: ҒОКЈ=0Тт050: NEXT: ВЕЕ 
РОҒЕ : МЕХТ: 6070270 

260 SCREEN 2, ,2: РКІМТСЗК (RX, 18) "e" : SCR 
EEN 2, ,4: PRINTCSR (МХ, 18) В% (O) CSR (MX *MD, 1 
9) ВФ (6+MD) : SCREEN 2, ,3: РКІМТСЅК (12,15) "S 
EAVE YOU КІБНТ!": ҒОКІ=070100: ВЕЕР: NEXT 
270 ҒОКІ=0705000: NEXT: CALL&H703: GOTO 1 


440 PLOT(I,CY):C(I)=Y:NEXT 
450 SCREEN 2,,7:PRINTCSR (7,6) SFC (4) 
460 A$=CHR$ (31) +СНКФ (29) 

470 В%(@)=" "+A$+" " 

АВ@ B$(1)2" E" *A$ e" 1":B$ (2) =" г" +A$+"1" 
490 Б%(5)="л4"+0$+"ь":НБ%(4)="Ч"+А%+"#" 
500 B$(5)-"$9":B$(7)-"e&" 

510 RESTORE:FORI-224T02728: READA$: DEFCH 

Б%(1)-А%:МЕХТ 
520 FORI-20TO22:SCREEN 2。。1:FRINTCSR( の 

,I)STRING$ (40, " Ш") ; : NEXT 
530 СХ-12:СВХ-СХ:МХ-20:КХ-18: BMX=MX : BR 

X=RX:M1=1:M2=2:R1=1:R2=2 
540 SCREEN 2,,7: ВЕЕРОМ: BEEPOFF : CALL&H7 

Q3:WHILE INKEY$-"":COLOR КМО (1) ж7+1:РКІМ 

ТСК (17,15) "ЅТАКТ! " : МЕМО: COLOR Q:PRINTCS 

(17,15) SFC (6) : COLOR. 7: ВЕЕР: RETURN 
550 DATA O0OOOOQOZCZCFFFF ,183C3C187EFF 

BDBD 


10 SCREEN 2,7,7,0:WIDTH4Q: BEEFOFF : DEF 
ІМТ А-2: RANDOMIZE:DIM C(318) 

20 GOSUR280 

50 FORL-1TO318 

40 CX=CX+C(L) : SCREEN 2,,1: PRINTCSR(CB 
X,19)" ";CSR(CX,19) "="; CSR(CBX*15,19)" " 
3 CSR(CX*15,19) "="; :CBX-CX 

5@ RO=RND (1) #7:ON RO GOTO 62,60,60,70 
,80: SWAF R1,R2:R-R1:RC-R1:RV-0: 60Т090 

60 ROSSGN((RX-MX)*2:0N RO GOTO 80,90,7 


@ 

7@ IF CX>=RX-1 THEN RV=0: GUT09 の ELSE 
RV=—-1:R=Z:RC=0: 507090 

80 IF CX+15=<RX+1 THEN RV= の ELSE RV=1 
:R-4:RC-O 

90 BRX=RX 』RX=RX+RV 

100 kK-ASC(INKEY$) : CALL*H703 

110 ON K-51 GOTO 140,130,150: IF K-32 Т 
HEN SCREEN 2, , 4: MV= (M=3) – (M24) :PRINTCSR ( 


280 SCREEN 2,,7:FRINT"' CYCLING '":PRI 
NT:PRINT"COURSE EDIT":PRINT" YOU MAKE: C1 
Ј":РКІМТ" I MAKE :І22-:РКІМТ" STRAIGHT: 


MX,18) B$ (0) ; CSR (MX+MV 。 16) B$ (M) : FORI-QTOS [31":PRINT" AGAIN s141" 56 の DATA 7E665AS5A5A585818,7E665A5A5A1A 

0: МЕХТ: PRINTCSR(MX+MV, 1 6 ) B$ (0) : MV-MV*2:C 290 INFUT A:CLS:FRINT 1618 

ALL&H703: GOTO160 200 PRINTSFPC(10)" ,— e ^ — ^ T^" 570 DATA O60FO0F7E9FBDBD7AÀ 。 7CCCB4B4B468 
120 SWAP M1,M2:M-Mi1:MC-M1:MV-0:GOTO 16 310 FRINTSFC(1 の ) " 1 Ке | ELLES 6 の 6 の 

の 55 PRINTEPC LIE = マデ トー ニー アー デー デー 580 DATA 6 の F の OF の 7EF9BDBDSE , さ E さ さ 2D2D2D16 


の 6 の 6 

590 DATA 769F7FFEFBEBBB の 7 , 00001F231DFD 
ЕЗОҒ 

00 рата の の の の FBC4EBBBFC7F の 。6EF9FE7F1F1 ブ 7 
11Е0 

610 DATA 99BDBDDB7ES3C3CSC , 9SBBCBCD87E 3F 
さ D さ D 

&2@ DATA 98BECBCDB7E ミ F さ D3D 


120 SCREEN 2,,4:PRINTCSR(MX,18) "в" : GOT 
О 120 ү; 

140 MV--1:M-32:MC-20:GOTO 160 

150 MV=1: M=4: MC=0: GOTO 160 

160 BMX=MX:MX=MX+MV 

170 IF КХ<>МХ THEN 200 

180 MC-0:RC-0:1F EBMX>BRX THEN V-2:M-4: 
R23 ELSE Уш-2:М-2:К-4 


ささ の PRINTCSR(0,6)"COURSE ЕрІТ"; СБК (0, 1 
1) "YOU ARE": QUAD (0,58) – (319,82) 

240 SCREEN 2,,6:CY-70 

550 FOR 1=1 TO 318 

5650 ON А GOTO 270,280,410,290:РКІМТ"ЕК 
КОК": END 

270 K-VAL(INKEY$) : CALL&H702: ON К-% BOT 
о 400,410,420: 65070570 


190 ВЕЕРОМ: BEEFOFF : МХ=МХ+У: RX=RX—-V 280 ON RND(i10*3«1 GOTO 400,410,420 6 さ の 
200 SCREEN 2,,2:PRINTCSR (BRX , 18) В% (RC) 290 Ү-С(1»):60Т0 430 e40 ' * CYCLING ا‎ 
; CSR(RX ,18) B$ (R) ; : SCREEN 2,,4: PRINTCSR(B 400 Ү=-–1: 6070450 50 ' 
МХ, 18) ВФ (MC) ; CSR (МХ, 18) ВФ (М) ; 410 Y-0:GOTO4:30 660 ' MASATO TAKAKUWA 


420 Y=1 670 
430 CY-CY*Y: IF РОІМТ(І,СҮ)<>0 THEN CY= 


CY-Y: Y= の 


210 RD=(RX= く CX) - (RX22CX*18) : IF К0<>0 T 
HEN 230 
220 MD=(MX= く <CX) -(MX22CX*15) : IF MD<>Q T 


神戸 市 Tadashi Inui 福山 市 し で ん あき ら 


ント 取得 . だ が その 後 は ? 


TEST гырт ре 


1 


PiO'84 年 8 月 号 Jr. の 移植 版 で す . それ 
な り に 面白 く て 楽し め ま す . 
衣 ミ ニ P ロ IO インフォメーション 


リス ト ど お り に 入力 し て RUN. 


スピ ビー ディ て 面白 いで すね . キャ ラ 
クタ も 凝っ て いる し な か な か で す よ . 


[SPACE キー で 上 に 上 が り ,[OI で 下 に 
トド が り ま す 。 FP の キー 入力 上 こう な っ て 
し まい まし だ . キャ ラク タ も 結構 定義 し て 
み ま し だ た. だ けど 主人 公 の キャ ラク タ だ け 


TEST PILOT FP BASIC リス F ИНИИЕКРОРООИИРКИКИИЦИЦОИЦЦОЦИЯИИОЦЦИИЦЦЯНИКИКИИИЦИООЕҢ 


1,18) 0%; : BEEPOFF: NEXT I :CALL&H7Ø3 Р:607040 ELSE IF Хі--2 THEN Н=1 ELSE H-2 
70 PRINTCSR(1 の 。 の ) "THE TEST PILOT F 120 FRINTCSR(XS。YS) C$1CSR(X, Y)s I$ HD 5 : 
P";CSR(4,1) "SCORE: ";S; CS8R(24,1) "ROUND: " GOTO 80 
jR;CSR OC, YO 1% (Н) ; tPRINTCSR (X,Y) I$ H) 5 3 BE 150 PRINTCSR (XS, YS) C$: CSR (X, Y) "СӨК 
EF: BEEP (X, Y*1) "^": CSR (16 ,W+4) "GAME OVER"; CSR (1 
80 Х5=Х: YS=Y: A=ASC (INKEY$) : CALL&H7OZ: 5,W+6) "SCORE: ";5; CSR (15, W+8) "ROUND: "$ R 
IF A-&H20 THEN Y1--2 ELSE IF Q=&h さ の THEN 140 IF INKEY$-"S" THEN 20 ELSE 140 
Y1 =2 150 FRINTCSR(17。6) "GOKAKU'":GOTO140Q 
90 Y-Y*Yi:P-PEEK (&H9 の の の +X+X1+Yx4 の ) 1 IF 160 DATA &HE6,"1F3F70707Q0FFEQEQ" , &HE7 , 
Pz&hE9 THEN X1=ーX1 "FBFCO60606FFO101",&HED,"EOEOEOEOEOEOEOF 
100 X=X+X1』 IF P=&HFC THEN 120 ELSE IF( F",&HEC,"01010101010101FF",&HE9,"3C42818 
P=&HE7) + (P=%HE6) THEN б-б-1:5-5%10:РБІМТС 18181817E" , &$HF2,"FF7E7C3C38:01010" 。&HFC 。 
SR (10,1) S5; ВЕЕР "OQBOSDCICZCZET7EFF" 
110 IF G=Ø THEN S=5+100:R=R+1: ВЕЕР: BEE 


は 変え て いま せん . 

何 物 を 全部 取っ て くだ さい . 上 下 の 壁 に 
突っ 込む と 死ん で 即 ゲ ー ム ・ オ ォ オーバー です . 
尼 は 3 面 ご と に 下がっ て きま す . 


5 WIDTH4Q:DEFINT A-Z 

1@ FORI=1TO7:READ Q,0$:DEFCHR$(Q)-0$: 
NEXTI 

20 F ま =CHR$(&h1F ) +CHRS (&h 1D) +CHR$ (&H1D 
)11$(1) z"e4"«F$4"CX": I$(2) 2" r@"+F$+" л>"; 
Сөж" " *F$-" " 1 0$z "yw +F$+ "әс" ; K$= " мн" + 
F$-"4u"ikKi1$-z"ee"«F$4"oo" 

50 SzO:R-1:W-2:U-0 

40 CLS:U-U*1:IF Uz3 THEN U=Ø:W=W+2 

50 X=W+4: YW*2: X122: Y1-72: Pz0:G-9: H-2: 
M=1: IF R=15 THEN 150 

6 の FOR Iz2 TO 38 STEP 2:PRINTCSR(I,W) 
KS; CSR(I,200)K$; :NEXT І:ҒОК 1=M+2 TO 18 S 
ТЕР 2:PRINTCSR(2,1)K1$; CSR(38, I) K1$5 : МЕХ 
T I:FOR I=4 TOS6 STEF 4: ВЕЕРОМ: PRINTCSR ( 


今 の うち に も っ と 前 進 し て お こう 


最近 , MULTI8 を 買い まし た . 安売り 


3:07 


し て いる の を 見 つけ た の で 思わ ず 衝 動 買 い 
жж £ 5 た の て эл 

と ころ が , MULTI8 に は ソン フト が 少な 
い ど ころ で な く な い に 等 し い . これ で は い 
か ん と 思い ソフ ト を 作ろ うと し まし た が が, 
ハー ド 関 係 が ほとん ど わ か ら な い の で まず 
練習 に この ゲー ム を 作り まし た . 
wš =PiO4 l7 + x — > a Z 


実行 する まで | リス ト ど お り に 入力 し て RUN. 


シャ トル は 凝っ て いる の に , 壁 が あ 
まり に も 情け な い の は 残念 . 


ゲー ム の ルー ル は , シャ トル を スク ロー 
ル し て くる 壁 に が ぶつから な いよ うに テン ・ 
キー を 使っ て 上 ト 左 右 斜 め に 動か に て て だ 


る い 、. 
プロ グラ ム 
だ いし だ こと に て な いい ので: Pc 
り そ う な と ころ だ どけ 書き ます 。. 
230 行 は 変数 1 に 入力 し た キー の 値 を 代入 
し ます . これ は 便利 な の で 他 に も 応用 で き 
る と 思い ます .。 まだ 。 マ シン 語 の ほう で は 


USR2 で 横 ス クロ ー ル を 行なっ て いま す . 
を その他, 280 行 の よう に V-RAM ア ドレ ス 
を 引数 と し て USRO0 コ ー ル する と キャ ラク 
ュー コー も. を 返し ます: 


1 


買っ て 1 週間 で 作っ だ た に し て は まあ まあ 
の も の が 出来 だ と 思い ます . 私 は PC-8801 
も 持っ て いる の で 88 で も 作っ だ た の で す が , 
あま り の 遅 き に 飽き れ て し まい ボツ と し ま 
し だ . それ 以来 。 88 は MULTI8 の トト 請け 
に 回 つっ てい ます (ゼイ タク な /)。 


————————— &—M—— „АШ. ————————————————— 


R Z=1 TO 9 : READ Y(Z) 1 NEXT 500 PR-RND(1)*95«1 : PLAY "N-PR;" : БЕТІ) 
170 '===== GAME START ===== RN 

180 GOSUB 450 : SC-0 : OV-0 : CN=@ : X=@ || 210 '===== SCROLL 
: Y=1 の : X1-0 : Y1=Q 320 A-USR2(0) : COLOR RND(1) ж6+1 : LOCAT 
190 '===== MAIN ===== E 39,0 : PRINT MAL2$』 

200 GOSUB 230 : GOSUB 320 : COLOR 39 : L || 330 IF CN= の THEN LOCATE 29,0 : PRINT LEF 

ОСАТЕ 0,0 : PRINTUSING"SCORE #####"; SC; T$ (WAL1$, (RND(1)*20*1)9*2); 

210 IF OV-1 GOTO 370 ELSE CN=CN+1 : IF С || 540 IF CN=1 の THEN R-RND(1)*20*2 : LOCATE 

№20 THEN CN= の : GOTO 200 ELSE 200 S9,R : PRINTLEFT$(WAL1$,72-R*3) 5 

220 '=====  SHUTTLE ===== 350 RETURN 

230 I-(INP(Q)*(CINPCI) ANDB) 20) +48) : IF 360 '===== GAME OVER = 

370 SOUND 6,11 : SOUND 7,7 

: SOUND 9,15 

580 SOUND 11,187 : SOUND 12,2 : SOUND 1 

3,10 

390 FOR R=1 TO 40 STEP 2 : CIRCLE ((X*2) 

*16,Y*8*4) ,R,2 

402 FOR 7-1 TO 100 : NEXT : NEXT : SOUND 
6,0 : SOUND 7,255 : SOUND 8,0 

410 IF SC>HS THEN HS=SC 

420 COLOR 48*RND(1)*6*1 : LOCATE 12,23 : 


-- 
© 
" 


SHUTTLE 
for MULTI-8 


By Toshikatsu Kato 


100 CLEAR 500,&HDFFF : SCREEN 0 : WIDTH 
40,25 : CONSOLE 0,25,0,1 :COLOR 7:С15 3 
110 FOR Z=&HEO の の TO &HE1 さ F : READ A$ : P 
OKE Z,VAL("&H"*A$) : NEXT : DEFINT A-Z 
120 DEFUSR の =&HEO の の : DEFUSR1=&HE の の 5 : DE 
FUSR2=&HE 1 の の : DEFUSR さ =&HE 1 2 の 

130 WAL1$-"" : FOR 7-1 TO 25 : WAL1$-WAL 
1$*"E"«CHR$ (29) +СНКФ (31) : NEXT 

140 WAL2$-"" : FOR 2=1 TO 24 : WAL2$-WAL 
2%+" "«CHR$(29) +СНКФ (51) : NEXT 

150 PLAY"LS2" : RESTORE 740 

160 FOR 7-1 TO 9 : READ Х (2) : NEXT 1 FO 


SOUND 8,16 


ї<1 OR 1>9 GOTO 280 


240 Хі=Х (І) : Yi=Y(I) 

250 IF X«X1«0 OR X«X1»30 THEN Х1=@ 

260 IF Ү+Ү1<1 OR Y*Y1»523 THEN Y1= の 

270 LINE (X*16,Y*B) -(X*16*31,Y*8*7) ,O,BF 
z X=X+X1 : Y=Y+Y1 

280 AD-&H8O000-«X*2«Y*640 : IF CN MOD 2-0 

THEN А=05К0 (Ар) ELSE Q=USR 1 (AD) 

290 SC-SC*X : AD1-£&H8004*X*2«-Y*80 : A-US 

R さ (AD1) : IF A=&H87 THEN OV-1 


Lak 猫 同志 社 発足 の 準備 の た め に ペン ネー ー ム を 付け 足し て いる 私 で す が , ЗН ғ 
の 名 前 が 妙 に 気に入っ た の で 私 の ペン ネー ム に くっ 付け て し まい まし た . 
ホ か ).“ び お に あん 山猫 " も な か な か 、 “Pionian 山 猫 " も いい で すね . 
いう の も いい と 思い ませ ん か (リス ナー みた いで ). 


2р.140 “KIRA ッ と Fantastic Totiyan" さん が 考え た PiO 読 者 
" ぴ び お に ゃ ん 山猫 " どん な も ん で し ょ うか ,。 いい 響き で し ょ う ( ア 
P.S. Pionist, Pionian な ど 色 々 あり ます が 。 Pioner( ビ オォ ナー) t 


PiO 


SHUTTLE BASIC リ スト 


FRINT "Hit RETURN Key" : COLOR 7 570 DATA ED,AQ,ED,A0,ED,00,01,4C,00,EB,0 
420 IF ІМКЕҮФ=СНКФ (15) THEN 180 ELSE 420 || 9,ЕВ,С1,10,ЕЕ,С9 
44Q TITLE ` idm 580 DATA ҒҒ,00,00,00,55,Ғ0,00,00,2А,АҒ,Ғ 
450 CLS 3 : COLOR RND (1) +6+1 C,00,Q0F,FF,FF,CO 
460 LOCATE 10,10 : РКІМТ" АР" : LOCATE 1 590 DATA QOQO,FF,FF,FC,00,SF,FF,FF,00,SF,F 
Q,11 : PRINT" WA" F,FF,00,FF,FF,FC 
470 LOCATE 10,12 : PRINT"AW H U T т || 600 DATA ғғ,00,00,00,55,Ғ0,00,00,5А,АҒ,Ғ 
L og" C,00,0F,FF,FF,CO 
480 CR=RND( 1 ) *6+1 : LOCATE 15,15 : COLOR || 610 DATA QF,FF,F0,3C,75,7F,FF,FF,QF,FF,F 


CR : PRINT"HIGH SCORE "; F,FF,00,FF,FF,FC 
490 COLOR さ 2+CR : PRINTUSING" НМ"; HS 620 DATA FF,00,00,00,:5,F0,00,00, SA,AF ,F 


500 COLOR 48*RND(1)*6*1 : LOCATE 13,23 : C,00,0F,FF,FF,CO 

FPRINT"Hit RETURN Key" : COLOR 7 630 DATA の の 。FF 。FF 。FC。 の の 。 マ F 。FF 。FF , BO, SF 。F 
510 IF ІМКЕҮФ=СНКФ (15) THEN 520 ELSE 510 || F,FF,00,FF,FF,FC 

520 FOR Z=1 TO 40 : LOCATE 39,0 : PRINT 40 DATA 00,00,00,00,05,00,00,00,05,00,0 
WAL2$; : A=USR2 (Ø) NEXT : RETURN 0,00,00,FF,F8,00 

5:0 DATA mmm 650 DATA 00, 3F 。FF 。C の 。 の の 。 の F 。FF 。FC 。 の 9 。 の F 。F 


C 。 の 。 の F 。FF 。FF , CO 

590 DATA の 9。FF 。FF 。FC 。 の 9 。 さ F 。FF 。FF 。 の の 。 さ F ,F 
F,FF,00,FF,FF,FC 

700 DATA 2Е,17,053,24,11,50,80,21,52,80,0 
1,70,07,Ер,В0,11 

710 DATA 50,88,21,52,88,01,70,07,Ер,В0,3 
E,QF,D3,2A4,C9,00 

720 DATA 5E,23,56,2B,EB,3E,17,D3,24,46,0 
F,D3,24,78,12,13 

フミ の DATA АЕ, 12 。 ビ 9 。 の の , の の 。 の の 。 の の 。 の の 。 の の 。 の の 。 の 
の 。 の の 。 の の 。 の の 。 の の 。 の の 

740 DATA -1, 0, 1,-1, 0, 1,-1, 0, 1, 1, 
1, 1, Ø, 0, 0,-1,-1,-1 


540 DATA 01,40,Е0,18,03,01,40,Е0,5Е,22,5 || Ғ,ҒС,00,00,00,00 
'6,C5,E1,D5,3E, 1E 660 DATA ҒҒ,00,00,00,55,Ғ0,00,00,2А,АҒ,Ғ 
550 DATA D3,24,CD,2B,EQ0,D1,D5,2E,1D,D3,2 || C,00,Q0F,FF,FF,CO 
A,CD,2B,E0,D1,3E 572 DATA QO,FF,F0,3C,00,3F,FF,FF,00,3F,F 


550 рата 1B,D3,20,CD,2B,EO0,3E,0F,D3,2A,C || F,FF,00,FF,FF,FC 
9,05,08,C5,ED,A0 680 DATA FF 。 の の , の の 。 の 9 , さ 5 。F の 。 の の 。 の の 。 さ の 。 AF ,F 


来い , Жо, も っ と 近く に 来い :… 


あな た は バッ クン で です: ЖАЗҒЫ? 35075 
で 違い 国選 て きま すず で SELA 
ネズ ミト リ 機 で ネズ ミ を 左 の 方 に 誘い 込み [4 |ells [2] で パッ クン を 操り , KOH プロ グ ラム 
パッ タン と つぶ すこ と に し まし た . へ 誘い 込ん て | SPACE |+ ー で パッ タン と 時 間 が 知 有 [いと 思う 入 は , 170 行 の TIME$ 
廊 ミ ニ PIiO イ ン フ ォ メ ーション つぶ 547241710950 T. X Off eS LTS. オー ル BAS 


制限 時 間 は 20 秒 で す . РЕВА (ОЕР R IC な の で 自分 で いろ いみ 改造 し て みて 〈 く だ 
り ま す . コツ を つか ん で くく だるい. Su. 


実行 する まで | リス ト ど お り に 入力 し て RUN. 


総 評 画面 が 寂し いで すね . ネズ ミ 取 り 機 
の キャ ラク タ も 凝っ て ほし い . 
バッ タン BASIC リ スト 


16 НІ=0: 605065260 56,140,130 

20 WIDTH46, 25: COLOR7,1:M-1:zN-71: X710: Y-16 159 ІҒХ>М THENM-M*1:GOTO1SeELSEIFX«M THE 
:5С=0: TIME$-"OO:00: 60" : CLS: КАМООМІ 2Е (ТІМ NMzM-1:GOTO1Se6ELSEIFN?^Y ТНЕММ-М-1:607015 
E) OELSEIFN«Y THENN-N-*1:GOTO1S56 

50 LINE(06,0) ~ (79,24), "+", 7, BELINE (0,0) ~ ( 149 IFB-1 THENM-M*1:GO0TO1SO6ELSEIFB-2 THE 
30,24),"*",7, В: SYMBOL (500, 10) , "ү 225", 5, NM-zM-1:GOTO1SO6ELSEIFB-3 THENN-ZN-1:GOTO1S5 
2,2 @ELSEIFB=4 THENN=N+ 1 : GOTO1 50 

46 LOCATE31,8: FRINT"HI-SCORE": LOCATES3, 1 159 ІЕМ>29 THENM-Z29ELSEIFM«1 THENM-1ELSE 
2: PRINT"SCORE":LOCATE33, 16: PRINT"TIME":L ІЕМ<1 THENN-1ELSEIFN?23 THENN-23 
ОСАТЕ 15, 10: РКІМТ"__" 156 Т=5СКЕЕМ (М, №) : IF T=&H89 ТНЕММ=М-2 : GO 
50 LOCATE3Z2,160:PRINTHI:LOCATES2,14:PFRINT TO179ELSEIF T=&HEE ТНЕМ290 

SC: LOCATE31,18: PRINTTIME$: ВЕЕР 1: BEEPO: K= 179 1 ОСАТЕМ, М: РКІМТ "9": IFTIME$^2"6060:00: 20 
SCREEN(CX-1, Y) " ТНЕМ290 

66 LOCATEX,Y:PRINT" "z:zLOCATEM,N:PRINT" " 180 IFSC-10060RSC-20600RSC-3O00THENCLS: LOCA 
:A$-INKEY$:A-VAL (A$) TE19。1 の sPRINT "ハー イ ! ヒト ヤス ミ ヒト ヤス ミ ! ": PLAY" v1 
76 IFA-4THENS-1:GOTOSOELSEIFA-6THENS-2:G S136cdefgab.oó6c":FORI-e6TOSO06060: NEXTI:CLS: 
OTOSOGELSEIFA-2THENS-3: GOTOBOGELSEIFA-8THE SC=SC+30: ТІМЕФ= "00: 00: 00": 650Т050 
NS-4:GOTOSOELSEIFA$-" "THENGOSUB2OOELSEI 199 GOTOS6 

FA$«7""THENS-5 200 FLAY"L3eV1SOSCB": LOCATEM, М: PRINT" 5": 
во ON S 60508240, 250, 260, 270,280 LOCATE15, 10: PRINT".^":LOCATE16,9:PRINT".^" 
90 IFX229 THENX-29ELSEIFX«1 THENX-1ELSEI 219 O=SCREEN (14, 10) :F=SCREEN (13, 10) : IFO- 
FY«1 THENY-1ELSEIFY?23 THENY=23 &HF&6 OR P-&HF&6 THENSC-SC-*106: ТІМЕФ= "00:00 
190 E-SCREEN(X,Y):IF E=&HB ウ ТНЕМХ=Х+2: 60 : 00"; P1 


236 FORI-OTO156060: NEXTI:LOCATE137, 9: PRINT" 
"SLOCATE135,10:PRINT" — ——":sLOCATE13, 

8: PRINT" "SsLOCATEM, М: PRINT" ":RETURN 

240 X=X-1: RETURN 

250 X=X+1: RETURN 

260 YzY*1:RETURN 

270 Ү=ү-1: RETURN 

280 RETURN 

296 SYMBOL (66,1600) , "TRY AGAIN?(Y/N)" , 3,35 
о: IFHI«SC THENHI=SC 

*ee КФ-ІМКЕҮ%: IFK$="y" THEN2ƏELSEIFK$=" n" 

ТНЕМ:21 ӨЕІ б6ЕЗӨӨ 

316 Сі5:1ОСАТЕ109,10:РКІМТ"А-4! オモ シロ カッ クタ? 

L'-PT-''"s:PLAY"v1SoS136bagfedc.oó6c"s:sFORIs 

OTO03900: NEXTI: END 

520 LINE (9,9) ~ (6440, 200) , PSET, 6, BF: SYMBOL 
(150,50), "Фф 1955 e", 95,9, 2: SYMBOL (50, 100 
‚"Ву М.5",4,4, 4: SYMBOL (156,150) , "HIT АМ 

Y-KEY",4,4,1 

3348 READAS$,B$:PLAYAS$*B$:DATA Т1901.8У1504 

E4A2RA4ABOSC2RACDE2RAF 4D2R4, OSF4. EDA4AA4EA. 

D4C204B4BA40SC4D4E2. R4 

340 FORI=0TO03000: NEXTI 

356 ІҒІМКЕҮФ< »""THENRETURNELSE 356 


T0110 220 10САТЕ14,10:РКІМТ">:1 ОСАТЕ13,9:РКІМ 
119 LOCATEX, У: РКІМТ "Ф" T"«":LOCATE13,160: РКІМТ" _": IFFZ1THENLOCAT 
126 B=INT (RND (1) #5) +1:ON В GOTO130, 140,1 Е14,8: РКІМТ"10": ВЕЕР: M=5: N25: P=Q 


[188 & SES L / 


上 空 に UFO の 基地 が で き 。 降り て き て は жем е sz eget, Ya XS 073 


хш зеки акин ати 


à ー ム が “4. REO に 
は ビー ム 砲 に 体 当たり し 始め た …. $ 評 — т 動き な ど 


UFO を 刀 治 する だ め に は , 上 空 に いる 


( 猫 同志社 ・ ぴ お に ゃ ん 山猫) 
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PiO 
うち に (ロケ ッ ト に 変身 し な いう ち ) 撃墜 し 


な けれ ば な り ま せん . ビー ム 砲 は 9 回 まで 
ロケ ッ ト の 体 当 だ り に 耐え られ ます . 


NEM upon КТІ? 


CLS: WIDTH 40,25:0-500:B-26:C-6:D-6 
COLOR 1:LOCATE 1,2:PRINT "me" 

LINE (0, 194) — (636, 196) , PSET, 4, BF 
COLOR &:LOCATE В, 25: РКІМТ 
LINE (1,3) - (358,12), ", ", 5, BF 
FOR Есі ТО 500: МЕХТ Е: Х=0: Y=9 
LOCATE X,YsPRINT " " 


" at^" 


X=X+1: Y=Y+.5: BEEF 

COLOR 2:LOCATE X,Ys:PRINT 
COLOR 1:LOCATE X,Ys:PRINT 
IF Х>25 AND Ү>12 THEN 300 
K$-INKEY$:1IF k$="" THEN 86 
K=ASC (K$) —48 

IF K«1 OR K>3 THEN 130 

ОМ К GOTO 170,180, 190 
M=294: N=18: A=A-10: GOTO 200 


" ES du 
" -" 


テニ ス ・ ゲ ー ム が 欲し いな ァ と 思っ て た 
と ころ へ , タイ ムリ ー な 3 月 号 の 「3D- 


DUAL BALL,. し か も , ソノ シー ト 入 り 
だ な ん て 言う こと な し で す . お 礼 に 自作 の 
ゲー ム を 発表 きせ て いた だ きま す . 


遊び 方 


1 一 6 人 用 の ジャ ンプ ・ ゲ ー ム で す . 何人 で 


16 WIDTH89, 25: SYMBOL (150, S0) 。 "90m JUMP", 
5,5.5:( ОСАТЕ 36,18:PRINT"Hit Space Key": 
Н-о 

20 ЕФ-ІМКЕҮФ:ІҒ Е%<>" " THEN H-zH*1:IF H< 
52000 GOTO2OELSE Н--520009:60Т0 20 

36 RANDOMIZE H 

40 INPUT SJA О. (1-6)"iP: INPUT "ナン カイ セン "5 Ms 
FOR I=2 TO Р+1:Т(І) =0: МЕХТ 

50 CLS:GOSUB 270: M=0: Å=ğ0:R=P*#W:FOR Ісі Т 
О 6:D(I)-O:E(I)-O:NEXT:U-O:K1-0 

60 Х=1:Ү=48: А=0:Ғ=0: Ј= (М MOD P)+2:IF J=2 
THEN FOR Ісі TO Р:.ОСАТЕ (INT(M/P))*2,1 
7+1: СООК Е (1) : РКІМТ"@":р (1) =0:Е (І) =0: МЕ 


XT 

79 LOCATE 3,4:COLOR 7:PRINT INT(M/P)-*1:" 
n4 #": LOCATE 5,5: СООК Ә:РКІМТ" Jumper"; J 
-13 T(J); "m "SLOCATE 15,6: COLOR7: FRIN 
T"("£&U-T(I)2s"m ) " 

86 B$-INFUT$(1)0:IF Б%<>"1" GOTO 86 ELSE 

FLAY"LS8OAERSERSBERSOSEEE":FOR Ісі TO さ の の 9 
s NEXT 


この ビー ム 砲 の エネ ルギー は 制限 が ある 
DT, 10 機 撃墜 する 前 に な く な る と 即 ゲ ー 
AXE tL УКОЛ. 


=200: N=10: A=A-15: GOTO 200 
190 М=100: М=4: А=А-20 

200 LINE (440, 182) ¬ (440-М, 50) , PSET, 2 
219 LOCATE 1, 14:РКІМТ "ノコ リノ エネ ルキ "ハハ" 
220 LINE (440, 182) -(440—M, 50) 。 PRESET 
230 IF A<1@ THEN 400 

240 IF Х<>26-М THEN 86 

250 COLOR 2:LOCATE X,Ys:PRINT "aP" 

260 FOR Есі TO 200:МЕХТ E:C=C+1 

270 LOCATE Х,Ү:РКІМТ " "COLOR 4 
280 LOCATE 1,16:PRINT "7" fU4"$ С; "лт" 
290 IF С=10 THEN 420 ELSE 50 

590 FOR Yz13 TO 22 STEP .5 

510 COLOR 2:LOCATE X。YsPRINT " e" 
320 LOCATE X,Y*1:PRINT " T" 

LOCATE X。YsPRINT " “BEEP 
LOCATE X,Y*1:PRINT " "NEXT Y 


文 ミ ニ PIO イ ン フ ォ メ ーション 


実行 する まで | リス ト ど お り に 入力 し て RUN. 


全体 的 に よく まとまっ て いま す が , 
ジャ ンプ し た 後 の 姿 勢 も 飛 距離 に 関 
係 す る よう に し て ほし か っ た . 


ЖАУ», 何 回 戦 に する か を 入力 する と ゲー 
ム ・ ス ター ト . [1| を 入力 する と 画面 左 の 
ジャ ング 右 を ジ ど ジャンパー が 滑走 を 始め , 
90m JUMP BASIC!) Z F RN 


90 A$-INKEY$:IF Х>199 THEN Z=Z:Z2=16.5:B 
EEP: GOTO 140 
100 IF АФ-"О" OR A$="Q" OR A$-"q" THEN 1 


SYMBOL (X, Y), "G". 1, 1.0, 3:X=X+3: Y=Y +1 
120 SYMBOL (X, Y),"9",1,1,J,3:GOTO 96 

136 2=Х/50:22=Х/19+.5 

140 IF Ү>142 GOTO 186 ELSE 

О 166 

156 SYMBOL (X, Y)? ,"B",1,1,0,35 
160 X-2X*RND(1)*Z2:0-A*.02:222—Aà: Y-Y-Z:IF 
X»631 GOTO 146 

176 SYMBOL (X, Y), "a", 1, 1,J,3SsFOR 1=1 TO 1 

50: NEXT: GOTO 140 

186 LOCATE 65,10:K2-(INT((X-200) / 1 日) ) /2 
: COLOR J:PRINT K2š "m ":SIF К2>К1 THEN K 
1-K2:LOCATE S5,23:PRINT"974*29":kKi1s"m 


IF X»631 GOT 


196 T(J)-T(J) *K2:K-21: IF T(J) >U THEN U-T( 
J) 
200 IF F=1 OR К=Р+1 GOTO 


250 


今回 は ビン ゴ を 作り まし た . 思考 / ル ー テ チ 
ン モ ドキ を つけ た の で な か な か 遊べ ます よ . 
*k š = PIO Z7 + X — > a Z 


実行 する ま て | リス ト ど お り に 入力 し て RUN. 


t 評 相手 が 捨て た 駒 と 自分 が 捨て た 駒 を 
区 別 で きる と よかっ た の で は ? 


b^, どう も . XENCT. 今日 は … や っ ぱぁ ー い よ ぉ 一 . 44 
…( ん な も ん いる の か ググ ). も う 書 きま せん の で ゆる し て ね (と 言い つつ PiOPIO の と きも デビ ュー の と き は 2 枚 も 載っ て ,。 それ か ら 良 〈 く 載っ た 
P.S. RYOKO さ きん が 復活 し た と だ ん, Nakkey き ん が 休ん で し まっ た だ た. そろ っ て 欲し いな 
P.S.2 2 月 号 の 伝言 板 の ら ぼる ん の 絵 が 気に入り まし た . 


か ら 、 ひ ょ っ と する と … と 思っ て い だ た りす る )。 
っ グ あ , Nakky る ん ハガキ あり が と ね . 


スロ ログ スム 
SP-5030 用 に 作っ て いる の で , 表示 部 分 
に 手 を 加え れ ば どの 機種 に も 移植 で どき ます . 
モー ド は 表示 の 方 法 が 変わ る だ け で 相手 の 
強 き は 変わ り ま せん . 私 は LOW モ ー ド で や 


イラ スト (落書 き ) が 載っ て し まっ だ た だ …. 


Жз, ビー ム 発 射 は テン ・ キ ー の |1|2| 
|3| キ ー を 使い ます . 


撃墜 ゲーム BASIC! д F Guss 


D-D*1:SCREEN 2,2:COLOR 2,2:CLS 
369 FOR Есі TO 366:NEXT E:COLOR 7,0 
565 CLS: SCREEN 7,7:COLOR 2 

376 LOCATE 36,14:PRINT "N ZN" B; "pa" 
38e IF D-16 THEN 450 ELSE So 

390 CLS: BEEPs PRINT "9"*L3»5.13Wt*"— t" C" 
400 GOTO 456 

419 CLS:PLAY "LACEGCEG":COLOR 4 

420 PRINT "サイ コウ 。 ト フウ テ フン nM':10*A-D«*5"7»5" 
430 GOTO 450 

440 CLS: BEEPsPRINT "9"2Xx»5.*"7» サレ タリ" 
450 PRINT :PRINT "U2*L4 N, Y*-/N#-" 
460 E$=INKEY$ 
470 IF E$z"Y" 
489 IF Еж-"М" 
GOTO 460 


THEN RUN 
THEN CLS: END 


この まま で は 最長 不 倒 距 離 は 無理 か … 


[olor|Q| を 押す と ジャ ンプ し ます . この と 
і, な る ごく ジャ ング 台 の 先端 で ジャ ンプ 
し た 方 が よい の で す が , ジャ ング 台 か ら は 
ずれ る と BEEP 音 と と も に , 勝手 に ジャ ン 
プ し て し まっ て , 飛 距 離 も 期待 び でき ませ ん. 
飛 距 離 の 合計 で 順位 を 競い ます . ちな み に 
ぼく の 最長 不 倒 は 122.5m で す . 


216 IF T(J)»D(K) THEN FOR Ісі TO P-K:D(P 
*1-1) 2D(P- I) :ECP*1-I) ECP- I) : NEXT: D(K) 9T 
(J) sE(K) =J』F=1 

220 KsK*1:GO0TO 200 

236 FOR Ісі TO P:LOCATE W*2,17*I:COLOR E 
(I2: PRINT I$". Jum"  Е(І)-1 5DCIO 5$ "m 
"sNEXT 

240 M=M+1』 IF M«R GOTO 69 

256 COLOR7:PLAY"LSO&CDCDFEDCCC":FOR 1-1 
TO S:iLOCATE 58, 10: РКІМТ" "FOR J=1 T 
О Se6e6:NEXT:LOCATE 38,10:PRINT"E N р": ЕОК 
Ј=1 TO 5ӨФ:МЕХТ:МЕХТ: LOCATE 40, 12: РКІМТ 
"REPLAY? (у) " 

260 C$-INKEY$:IF C$-"Y" OR C$-"y" GOTO 4 
o ELSE 260 

276 CONNECT (1, 58)- (1846, 120) , 5: CONNECT (25 
6,156)-(640,150),7:FO0R Ізі TO 5: СОММЕСТ ‹ 
484-35*1,150) -(4B84*26* 1,186) , 6: NEXT 

286 CONNECT (200, 46) - (360, 1) - (460, 40) - (50 
09,1) - (600, 40) , 7: RETURN ' 


これ で 2 回 も 逆転 きれ た か ら な ぁ 


る の が 一 番 面 白い と 思い ます . 
な お 相手 の 強 る を 変え た だ いと き は , 
ト 中 の "A(D)=A(D) 二 4 の 十 4 を 変え て < 


) ス 


だ さい (変え る と ころ は 4 箇所 あり , 全部 同 
人 値 に し て 《 だるい)。. 値 を 少な くす も と 
場所 に こだわ る よう に な っ て 少し 弱く な り 5 


う ェ エー ん 。 これ で ファ ン が 減っ つて し まう 


P.S.3 野沢 せ ー や さん の 絵 も 好き だ な 


iO 


iT. +5 ら が 一 番 強 いで し ょ う . 改造 は 


REM 文 を 参考 に し て くだ る きい. 


susu BINGO BASIC リ スト 


қ 


zB REMO e 
58 FEO E IHG O FOR M2-89820-2* J 
46 РЕМО 2 
sg REMO 1334€ 18 238 コ 
5й КЕМО コ 
zü РЕМО IN MIIKE HIGH SCHOOL 0 
Sg REMO g 
эй RE 


за REM #### コキ гот %%%% 
{йй DIM Hcl. 252). MEZ’ ALZA FOR Т=8 ТО? 
3: README I2: NET : ТЕМРСЕ 
118 FOR Р-й TO1:FOR [=й TOZA:NZP.ISISH 
EXT:NEKP.25»-2ü:FOR 1=8 TO 24 
120 BzINTEZRHDG1*252:E-HZF. IO: МЕР, Iz 
PAD: НР. A) ZBSHEXT: NEST 
150 CURSOR1N, 9: INMPLT"Et-$* толп ?:t-.T. 
1 DESEE еле aep etfi 
14а INPUT" MODE krian. 2:1 СОЮ. d HIGH. 
T” ZıZ=INT(Z):IF < 2519293, THEH1 46 
"158 PRINT"E 2:% жжж BU T m 
bkk YY 
1E PRIHTTHBS»5s "BOUE" s TABS 
I78 RBR#=" ————r Ir "PRINT" 
u "оО 
128 A=" (RINE RE IRE IRS |": В" ーーーーー 
+———" 


282: "CONS" 
"ЯҒ: 


13 FOR I-B ТОЗІРКІНТ" "1AF" "АЗ: 
PRINT" ":6%;" “$ EF: HERT 
200 R$=" m ":РЕІМТ"О "SAF 


ч. аф 
218 РЕІМТТЯВ(72: 
1 a" 
228 FOR 1=й TO24:VeINT(CI/SO: 
BOR Хж3%5.Уж244 
Б баланы ы ысы Абы 
x 
248 IF 2<5 GOSUE 388 
250 IF 225 GOSUE sue 
299 REM e*** 042 -%) 
7090 ОМ F GOTO 400 
318 CURSOR 8.28:PRINTSPCCZED t MUSIC"G2": 


"ГІНЕ: й": THBCZ7?»: "LINE 


xe I-VI CUR 


КӨН; 


tee 


P.S. 


CURSORG. 260: INPUT" КЎ 12027 з тооп?" Н 

$280 H=IHTéM)-1:IF :HizE&o*CH2243». ТНЕН518 
T R-25:FüR [=й TOZ24: IF Н-Нс0.12 THEN 
Hn 

346 HEXT:IF Н-25 THEHZ1G8 

350 5050Е EHA: IF <Н(й.252242%2Н61.25224 
3THEH S868 

3680 F=F+1: IF Fzz THEN Ғ-й 

тй GüTOZGG 

533 REM ФФФФ M2 11-52) ФФФФ 

3 CURZüRG;.z22:PRIHT"?92 "РОБЕ [=й ТІ) 
z4:HCIo-28:IF Hr1.Is225 THEH430 

418 V2INTzIÁ/So:321-V*85:FOR Asye TOv 
4:IF H£1:H2-225 THEN ACI =ALI?+4 

328 MEXT:FOR A= TOE*260 STEPS: IF H1. 
z25 THEN ACI =AčI+4 

430 HEXT:IF хеоуү THEN 466 

446 FOR BB T024 STEFE: IF Hii A? 
H ACI =HK 12+4 

450 HENT 

дей IF X£'i54 THEN 496 

478 FOR A=4 TOZE ZTEPa:IF Hr 1 、 
H Rúli=Rú 15+4 

450 NEXT 

3238 HK IS-2H£IO-MCIDO:NEZXT 

SE R=ü:E=B:FOF I= TO24: IF ASA: I> 
E8=I:R=HRšI) 

218 HEXT:IF H<(1,E5=25 THEN R:B»z 
ай 

S20 HzHCIBS:PRIHTH*1:"97222. ":GÜSUB Е 
ай :IF HOA ED dt NH 25224?» THEH SHE 
S38 GOTO 36H 

S99 REM ФФФФ трусы ササ コール ルーキー 9999 

eda FOR [=й ТПЇ:Н=Й:РПЕ Р=й TO24: IF H=H 
<1.Р> THEN A=F 

510 MEXT:MCI.Bos25: V2IMTZiRÁ/85:X 
URSOR Іжрбехж543, үжгее4:РРІМТ ЕЕ" 

БОЙ ZzWVw«5:Ez'emf-4:RII:GÜSUB?68 

658 5шХ:Есие20:Ес5: ОПӘМЕРИЯ 

&48 IF Хау ТНЕН SzB:E-24:F-6:GÜSLUBp?a68 
S50 IF ҳ+у=4 THEN Z24:E-Z8: R24: GÜSUEBTEE 
SE HEXT:RETURH 


-25 THE 


TMEH 


a GITES 


C 


n 
E Cur Ct se sp cQ 


三池 高校 パソ コン 愛好 会 会 員 募 集中 . < 
れ か ら 無 線 の 好き な 人 無線 部 へ 入ろう . 


ұза REM ФФФФ 1771-3, J Ii- %%9 

гай E-ü:FÜR Р=5 TUE STEPFR:IF HIT P= 
THEN Е=Е+1 

716 HEXT:IF Б=5 
346 УФ, 
a CURSOR D*Z8*125:13: PRINTHEISZS3:RETU 

ココ REM %%%% БАМЕ ЕНГ **** 

300 IF НС1.259>4 THEN Н4т "Гог 

расы бн 

2310 IF Hrd. 29124 THEN H$-2"T^rs 2 — TTTUS 
ээ" 

229 IF “На, 283240 *6H£ 1. 252;4? THEN R#= 

Tug Hn =, ا از تی‎ t" 

336 IF (ней, 292324 )*£HX 1. 280240 eCFETE Т 
НЕН Afs" uian 227 J "325 ) PII 

348 IF NEB. ASIEN, 2525240 *CFB71? T 
МЕН AS=" I zy 9. эту!" 


THEN H&I;295zNCIs29»*1: 


250 MUSsIC"GDFEFCE" 
зей PRIHT"ESSSSZEZEZEnE":H$: РЕІНТ "00886 
Sg モウ イト" 


セリ っ コマ” Pe Жым y" 
СЕТЕ: IFG$z"'"THEHRLMH 
айтавуи 
REM. be: nx» FI 
IF 2-1 THEN 320 
FOR [=й ТО24:Ү-ІНТЕІУ2: 
қж3%25, E+ PRINT" 
zü FOR 1=й ТО24: = 
EIFS EAA 
1 PRINTRTGHT ま <" 


+++ 


po тері er 


HS IES CUR 
n :НЕАТ: FETILEH 
ІМТ маг: CUR 


ае M T. 


"STRECHE. [Itilis ZON 


3 OATH %%%% 


| eux 
(284 


海 の 中 を 泳い で いた カニ くん は , АСЕ 
苦し く な っ た の で 海底 か ら 出 て くる 泡 で 浮 
カカ を つけ て 水面 へ 浮上 する こと に し まし た . 
支 ミ ニ PiO イ ン フ ォ メ ーション 


| リス ト ど お り に 入力 し て RUN. 


メル ヘン 的 で いい で すね . た だ , と 
きど き 絶 対 に 取れ な いよ うな 所 て 泡 
が 出 て くる の は 残念 . 


(775 


水深 17m の と ころ を カニ くん (らし き 生 


物 ) が 泳い で ます が , 水面 まで 浮上 する に 
は 泡 を 食べ て 浮力 を つけ な けれ ば な り ま せ 
^. 泡 を 1 つ 食 る ご と に 1m ず つ 上 が っ て 
いき ます . そこ で , [N| と | の キー を 使っ 


1 TEMPO 4:GOSUB 27: КЕМ аш NITU 
оғ, a 
FUR HY= 
IF PEEK: еле AAGE RE: 
М=8: TI $£-MIDSCTIS: 4. 


! "ay 


28 TO 3 STEP. -1SGUSUE 18$ 
)z18? THEH 141 
еЗ-ЕТЕНТ% СТІ. 


|n -2 ته‎ xg TU 


CURSOR п, й: РРІНТ "ТІМЕ "Ті": 
7 ЯЕ <Т1#2=>1 THEN 22 

GO SLIE 17 :РОКЕ 17 S28. Bs GET EE 

IF :G$2"N'"ox*CkzizEU» THEN 1% 

IF GF "MEN 22 THEN 15 

[F Gf-"H" THEM x-xX-1:GÜSUBE 17? 
18 IF 5#="M" THEN қтхжізАаПӘМЕ 12 
11 IF v=<UV THEN 13 


‚мә DU cr 


て カニ くん を 左右 に 移動 きせ て 泡 を 食べ て 
くだ るい. うま く 捕 まえ な いと , すり 抜け 
て し まい ます . 

カニ くん が 水深 10m の と ころ まで くる と 


よし , 1m 浮 上 し た ぞ // 


{2 HzH*1: [Р H=:2 

(5 HERTIELIESUR ЯЯ, 
HsGUTU 2 

14 GOSUE 123:V2Vv-1:GÜSUE 17?:GüSlE 13: IF 
"=<3 THEN 23 

15 GOüSLE 28:60TG 2 

15 CURSOR BEIBVIPRIHMTU'OU"SICURSOR AM. R'+1 
ІРРІМТ" "siMUSIC'""CH": RETURN 

ІР? CURSOR XVIPRIMT" оске о USRETURH 

18 CURSOR Xs. *1: FRINT" "RE TURN 

012 CURSOR A-1 AVIPRIHT" o 2": MUSIC"FIRM 

CS": CURSOR Ax-1. QV: РЕІНТ" ' S RETURH 

750 IF iU. THEM Е-25 

21 REZIHTECRHD& 1» *R»*5 


THEN é 
RVRFISIPRINT" "iGÜSUE 2 


: FETURH 


泡 の 出 方 が 変わ り ま す . 
カニ くん は 1 分 以内 に 水面 に 達し な いと , 
アワ を 吹い て 死ん で し まい ます . 
表 1 


変数 表 


泡 の 座標 
画面 の 10 進 スタ ー ト ・ ア ドレ ス 
GOTO 用 カウ ンタ 
а дыы 


秒 

リア ル タ イ ム ・ キ ー 入 力 用 変数 
カニ くん の 座標 

泡 の 発生 状態 が 変わ る 深 さ 
ルー プ 用 カウ ンタ 

| 泡 の 発生 場所 (範囲 ) を 変え る た め の 変 数 


表 2 行 番号 マッ プ 


初期 化 へ ジャ ンプ 
ルー プ 
жетілу”? 
分 と 秒 の 計算 

時 刻 の 表示 ,。 1 分 か ? 

キー 入力 と カニ くん の 移動 
泡 の 発生 状態 が 変わ る 深 さ か ? 
泡 の スピ ー ド を 変え る か ? 
ルー プ , ANWR 

カニ くん は 水面 に 達し た か ? 
ルー プ 

泡 の 移動 

カニ くん の 表示 

カニ くん の 消去 

泡 を 食べ る 処理 

泡 の 発生 場所 を 決め る 

ゲー ム ・ オ ー バ ー 処 理 
初期 化 と 初期 画面 作成 


カニ < くん の 浮上 作戦 BASIC リ スト wasaman 


22 CURSOR X,V-1:PRINT"2^*20 3*9'":MUSIC'"" 
C2B2R262FZ 120203": GOTO 24 
25 CURSOR х, Y-2:PRINT" Y 
24 CURSOR 13:20:FRIHT"€skti 7 
T 8%:ІҒ G$z"'" THEH 1 

25 IF Gf£-"H" THEN ЕМС 

26 GOTO 24 

27 РКІНТ"Е":ҒОЕ 1=й ТП 39s: CURSÜR I.22:FPF 
RIHT"5":CURSOR І. 2:РРІНТ"_": НЕХТ 

28 Яр=55248: Х=19:0=1 7: GUSUE 1?:R-18:L'M— 
18: 5050Е 2@а:Т1+="@ййййй": RETURH 


m.p orn 
Сум" t GE 


b. PS.4 Free Talk の 右 下 の イラ スト は SiO の 続き で すか ? 


Ryoko 3A. 


(PiO10 み た いな 遊び の 貢 を 増やし て ほし い 火 星 磨 :Ryoko Love) 
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tO HEE 


身近 な 情報 を 写真 年 原稿 で 大 募集 


2 H12H, 晴海 見 本 市 会 場 に て 行なわ れ 
だ '85 メ カト ロニ クス ジャ ッ パン に 行っ て き 
の て で て レポート し あし た な 。 

- 番 た な くる ん あっ だ も の は , テー マ か ら 
子 想 し て い だ た とおり ロボ ッ ト 類 で , シリ ン 
ダー。 モー ター 類 か ら コ ンピュータ 制御 の 
ロボ ッ ト ま で だ くさ ん 出展 し て あり まし た . 
他 に は CAD/CAM シ ステ ム と いう も の も 
だ くさ ん あり びました 。 

見 て いて 面 牛 か が っ だ の は SARAC シ ステ 
ム と 言っ て 水鉄砲 の ょ うに 水 を 出し て いろ 
いろ 切断 する も D UT. それ で 本 を エリ マ 
キト カゲ や 和牛 の 組立 て 式 の か ざり 物 に 切っ 
の て いま し だ 、 

使え を うな も の と し て は キャ ステ ィング 
と いう 全 自 動 線 材 切 断 皮 むき 機 で これ は 同 
じ 長 る で か っ て に 上 度 を 何 本 で も むい て くれ 
る も の で ハー ド の 工作 に いい と 思い まし た . 


JR ユー ザー な ら 誰 で も 一 度 は 「JR? あ 
b, 消し ゴム キー ボー ド の あれ か 」 と 生 鹿 
СЕБЕТ ОФГ |. ке a 
HF U < FHI J x^» ЈК200 は SC3000 の 
キー ボー ド と 同 素 材 の プラス チッ ク ゴ ム が 
使わ れ て いま す . 

合成 ゴム に も ピン か ら キ リ ま で あっ て ., 
消し ご むか ら 長 で つま で その 用 途 は る ま ざ 
まで す . その 生成 過程 は ゲタ ジエン を 付加 さき 
せ て … な ど と 話す と 説得 力 に 欠け る の て , 

_ 諭 より 実験 を し て JR の キー ボー ド の 消し 
ご むと し て の 価値 を 調べ て み だ た いと 思い ま 
%; 


JR キー の 消 
し ゴム の 価値 
は いか に 


SARAC( サ ラテ ラック) シス テム 


я 


ا 0 


キャ ステ ィング N1001 型 


と 言っ て 本 当 に JR の キー を 壊し て 使う 
わけ に も いか な い の で , 今回 は JR の キー 
と 同 素 材 を 使用 し て いる , 松下 の 電卓 JE 
361 を 使い まし だ . まず 鉛筆 で 私 の 絵 を 4 
個 書 いて , その うち 3 個 を 各々 ,。 消し ご 
(К УЯУ МОМО), 電卓 の キー( 以 下 
JR — E 8&3), 水 で 湿ら せな た 指 で 消し て 
み ま した. 


消し ご む は 当然 きれ い に 消 すこ と が で き 
まし た だ . 指 で は ある 程度 消 を ん だ た の で す が 厳 
電 に 言う と 紙 を 削っ て. きれ い に し て いる 
わけ で す . 

JR キー は , な め ら か な プラ スチ ッ ク ・ 
ボー ド で 紙 表 面 を こす っ だ か の よう に , $i 
管 で 書い た 部 分 を すり の ば し て いま す . š 
だ , 消し ゴム 使用 の 際 に 出る 消し カス は ま 
の また に の さよ は 9 
JR キー の 消し ゴム の 価値 は 皆無 と いえ る 
で し ょ う 。 で すか ら , これ を 読ん で いる 他 
機種 の 君 。 も う JR を 消し ゴム 扱い し て は 
いけ ませ ん よ . 

最後 に JR ユー ザー で 愛 機 を 手 放 そ うと 
に を ky を 大 に 一 名 いま うる な S Ë 
げ い む が な に か や る 一 超人 』 

お な あと が れ が よる し に よう で 。 


РС-8001тк も パタ ー ン 認識 装置 に 一 役 
買っ て し まい まし た 


, 


ステ ッ ピ ング ・ モ ー タ ー を まっ すぐ 伸ばす 
と どこ うな る !? 


よく 消し ゴム キー と 馬鹿 に され る JR 


ibik e 
TP X] 


е жаты 


TOMBOW - MONO 使 用 
きれ い に 消 える 。 


JR キー と 同 到 材 の 
Panac361 の キー を 使用 
完全 に 消え な い . 
消し か す が 出 な い . 


水 を つけ て こす っ た . 
完全 に は 消え な い . 


ゲー ム ア イ デア に つい て . 突然 で す が 。 ゲー ム ア イ デア に つい て で す が パ ソン コン ゲー ム の ほとん ど は 。 な ぜ か 発想 が 枠 に は まり が ち に な っ 
て いる と 思う の で す . ビデ オォ ゲー ム の そっ くり さん が そこ ら 中 に 出 て いる の は 事実 な の で す . も っ と 目新し いも の が ほし いで すね . パソ コン 


な ら で は と いう よう な ゲー ム が (すべ て アク ショ ン ゲ ー ム に つい て の こと で す ).。 
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その だ め に も PiO パ ーッ ツ を 今 ま で 以上 に 盛り 上 げ よ う / 


(NECC の ひら まつ し ん じ ) 


ビオ イン デ ッ フ スズ ス 


INDE 


ヒッ ト ・ マ ン | マン フォ ー ル 
PC-6000 シ リー ズ PC-8000 シ リー ス 
SCORE HHD1SH HIGH 00500096 ETAY EVET ERETTI 
し パズル 的 要素 が 含ま れ て いま す . 
市 販 ゲ ー ム の “ロード ラン ナー, 
"倉庫 番 " を 足し て 2 で 割っ た も の に , 
オォ オリジナ ル 人 性 を 加え だ と いう と ころ 
Tum. 


г 1 Broken 
PC-8001mk II 


ある 日 , あな た は 倉庫 も も アパ ー 
ト と も 判断 の つか な い 所 へ 入っ て し 
даа BRIBMSXvM—EM 
EFL, エス カレ ー タ も あり ます . 
BROKEN で ある あな た は, КО 
手 か ら 逃 が れ , ドア を 破壊 し て 数 あ 
る 部 屋 か ら 6 金庫 を 盗み 出し て くだ る 


БЕТІЛІК >а 
Tap m >D >D AB 


L2 Ети A 


ミニ チュ ア ・ モ デル の 会 社 で 警備 йы оаа ао nisa 
の アル バイ ト を し て いた あな た は , i 2 E 
ある 日 た っ た 1 人 で ギャ ング 団 を 迎 m ЕЕ 
え ぇ 撃つ は め に な っ た . жн. да Tm —Ó 


さて 、 "あな だ は めで て た 《 孝 マツ アグ B Y 
を 撃退 で きる で し ょ うか ? 
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Lac. | А ғ 
m e PC = 8000 ツン リ -— FÀ パパ キキ マコ キネ ペー テン キマ そそい 
サー チラ イト を 使っ て , 夜襲 や か 3 機 の サー チラ イト と 2 機 の 対空 砲 
け て くる 敵 を 探し 出し , 撃隊 する ゲ を 効率 よく 操作 し て , 爆撃 か ら 都 市 
ー ム で す . を 守り 抜い て くだ る さい. 8 Š 

- ы eee ае k L kakek k erede 
ӨЛЕШЕ 

ROUND (йз 


"SEM PC-6000 シ リ ー ズ 

華山 な る テー マ に 乗っ て あの 超大 
作 ス ペー ス ユ スモ ・ ア ド ペ ベン チャ ー 
シリ ー ズ の セー ロー “キッ ユー マ 
х" が 帰っ て 来 た . 

悪 の パピ ュー ン 軍 団 を 討ち 減 ぼ し, 
平和 な 地球 を 取り 戻せ / 


に エロ 
FM- 7 
今日 も サー カス は 満員 御礼 V 何かと いう と ," お っ と , 空中 プラン 
我 が MZ-700 に は 面 数 の 多い パ ズ | エロ 君 の 仕事 に も 精 が 入り ます . コ よ りゃ も 数 倍 危 険 な . 空中 風船 渡り 
ІРІ! ル ・ ゲ ー ム が な い 。 そこ で 作っ た の ST, そん な ビエ ロ 君 の 見 せ 物 は な ん で す よ . 
П 7 が この ゲー ム . パズル だ け で な く , 
J MR RW SR の の 2 | リア ル タ イ ム な 要素 も 含め , 面 数 は 


る を A E | 
POO 200 面 し いう も の で す . し か も , fii 
VODPOD Ch ELVARS 2 Z Рас ДЫ 


1552 FU. ru | 


I 
I 
i 
i 
j 
і 


900 ¢ 6 ¢ 


00099 999 
9% 
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pd um 
PC-8000 シ リー ズ | ERES JR-100 
^ カ ー ン /“"。 さき さあ, 時 間 無 制限 の 1 
本 勝負 が 始ま っ た . 技 の 種類 どけ で 
も 23 種 も ある プロ レス ゲー ム . も ち 
ろ ん, 場外 乱戦 も 付い て ます . 

は た だ し て 君 は , 相手 レス ラー を 何 
分 で マッ ト に 沈め られ る か / 


チッ プ ・ チ ャ ッ プ の 家 に , 突如 2 
匹 の 狂 禁 な モン スタ ー の トム ・ ク ロ 
ー ム が 現われ だ た . だ が こい つら は 赤 
外線 ラン プ の 光 に 弱い こと を 知っ て 


NS TAO LAN IZE 
N E E у uS 
チャ ッ プ は どの ラン プ が 赤外線 ラン 
プ だ っ た が 計れ て も し まっ だ の だ 。 


地獄 の 黙示 録 


FM- 7 


RRA 


KEY 7 $9 - U 


E x 
REAK - н» 


英 の 地上 基地 破壊 へ と 向かっ た あな 


地上 基地 か ら 6 の 想像 を 絶する ほど の 
対空 攻撃 で あっ た . 


BENI PC - 6000 シ リー ズ 

PH 2,0046, 人 類 は 増え 過ぎ た 戦争 が 勃発 し た . 

人 間 を 移住 きせ る た め , 宇宙 へ と 進 物質 の な い 地 球 は 苦戦 を 強い られ 
出し た . だ が , アン ドロ メダ 星系 で た, も は や 最後 の 切り 札 と な る の は , 
R 星 の 移民 団 と 遭遇 し , 第 1 次 宇宙 新鋭 機 の コパ ー マ イ ン 号 の み で ある . 


ザ ・ ボ ポン バ ー 
MZ-1500 


腕 き き の ス パイ で ある あな た だ た の も 
Ес, 新しい 任務 が 届い た . その 任 
ЖЕЗ, フェ ノラ ー ト 軍 の 基地 を 破 
壊せ よ と いう も の で あっ た . 


だ が , フェ ノラ ー ト 軍 の 基地 は 番 
Ipso B スタ ダン II に より 。 
厳 車 に 守ら れ て いる の だ . 
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最新 鋭 の 戦闘 リュ コ プ タ に 搭乗 し , 


7 だ な だ りあ わな 大 を 待っ て そい た SOR, 


ЖЕЛЕО "SPACE 


| а Poisonous 7 


MZ -80B 


JR-100 


爆発 実験 の た め , 時 限 爆弾 を 地 中 
UK < 埋め だ た の だ が , 間違っ て 破壊 力 
の 大 きい や つ を 埋め て し まっ た 。 

を そこ で あな た だ は , 水 に 弱い と いわ 
れる この 爆弾 を , 地下 水脈 の 中 へ 沙 
と すこ と に し た だ た. こう すれ ば 爆弾 を 
на САФ BIEN 
ー ゴ ン が 住ん で いた の だ っ た . 


amm 

BÉ X 1 シリ ー ズ 
1/O 諸 81 年 10 月 号 で 発表 る れ た 芸 
MOUSE”. 
今 ま で に も 数 々 の 機種 に 移植 され , 
今回 は XX1 版 の 登場 で す . 

最初 の 発表 か ら す で に 3 年 と ちょ 
ex bL о Т ЕНЕ 
EOE CGM, 


実験 室 で の 事故 が 生み 出し た も の 
は , お び た だ し い 量 の 有毒 ガス と , 
奇怪 な 生物 の ク テ リ アム を 含む , 数 
種類 の モン スタ ー た ち で あっ た . 

だ が, この まま に し らし て お くけ に 
は いか ない . 一 記 も 早く な ん と か し 
な けれ ば , 次 々 に 渦 染 が 広がっ て し 
t5. 


ファ イア ・ ク ラッ カー 


1715311111111) 9 


爆弾 魔 が 置い て いっ た 爆弾 を , 5 
な た だ は 制限 時 間 内 に 入れ 物 の 中 に 入 
れ な けれ ば な り ま せん . Có, 爆弾 
は 直接 操作 で き な い し , 回 転 台 や 移 
動 台 の 動き は ちょ っ と 和 複雑. クレー 
ジー な 世界 が あな だ を 待っ て いま す . 


ИТПЕН 


в.о: а 


Gam. am 

жаты — 

K SC-3000 ES MZ-2200/2000 
21 世 紀 後 半 , 謎 の 宇宙 生物 が 地球 1999 年 6 月 6 日 . ОЯЗ AMIK 
に 襲い か か っ だ . これ を 防ぐ で べく 。 し た 未確認 飛行 物体 の 攻撃 を 受け た . 
地球 防衛 軍 は MEGALOT を 出撃 る そこ で 月 羽 郡 を 守る た め , シャ モエ 
vie. 障 士 が ひそ か に 作っ た だ ロボット 
"ВЕКЕ" に 搭乗 し , 天空 めがけ て 
出撃 し て 行っ だ た あな だ 。 ВЕСТ 


あな た は MEGALOT を 操縦 し , 
うず まき 状 に せま っ て く 〈 る 敵 を 倒さ る 
な か は れ ば な ら な いき て 。 FELET 
МА 54.2 2° ? 


IISTARM 


既に この 世に は いな い 最 愛 の 人 が , 突然 


再び 同じ 姿 で 目 の 前 に 現われ た と し た ら …. 


そし て , 最愛 の 人 と 幸せ な 思い 出 だ け て 生 
き て いら れる と し て も , 難 っ た 人 を 再び 愛 
ずる と が て きる た ろ 信 が 

「 な 世 ? な 攻 授 っ て し まつ だ の 7 RE 
奪っ つた 交通 事故 は 2 人 の 幸せ を 一 瞬 の うち 
jul. 5% S БУС. 

その 夜 も ジェ ニー は , いつ も の よう に 夫 
の 想い 出 を 連れ て 浅い 眠り に 落ち て いた . 
や が て 軽い 物音 で 目 ざ め た ジェ ニー は , Ж 
を 赤く 染め る 山 火 事 を 背景 に 目 の 前 に 立つ 
男 を 見 て 恐怖 の 叫び を 上 げた . 男 は , どこ 
か ら ど こま で 完 べ き な 愛 する 夫 の その 人 だ 
а ТОО; 

ジェ ニー の 眠っ て いる 間 に 起 きた 山 火 事 
が スコ ッ ト を も う 一 度 こ の 世に 誕生 させ た 
の だ っ た 。 スコ ッ ト は 実は , 先ほど 地球 に 
不時着 し た 宇宙 船 か ら 逃 れ た “ 異 星人 "の 
仮 の 姿 だ っ た . は る か な 宇宙 へ の 交信 を 願 
v, 147 ケ 国 の “遊び に 来 て くだ さい " の 
言葉 を 乗せ た ボイジャー2 号 が 打ち 上 げ ら 
れ た の は 1977 年 . スコ ッ ト は , それ を 解読 


し て 地球 を 訪れ た 最初 の 宇宙 人 だ つっ た の た だ . 


が , 政府 は これ を "REN に よる 地球 
侵略 の 一 歩 と 解 し て , "REN 回 収 指令 
を 全米 に 放つ た , そう し た 中 で 。 た だ 1 入 
若い 科学 者 シャ ー マ ン は , 不時着 現場 か ら 
ボイジャー2 号 の 金色 の レコ ー ド を 発見 し 


T, 宇宙 か ら の 使者 が 来 た こ と を 確信 した. 


ジェ ニー の 横 に ゆっ た り と 腰 を お ろ し た 
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ПО FP-1100 


AmE SE b S qL 2 Ç 2:25 2 2°, 


ос, лб. IZ + s: O 
の 中 で 最も 知ら れ て いる 7 並 ベ ゲー 
ム の FP 版 で す . よく 知ら れ て いる 
だ け あ っ て 。 各地 方 に いろ いろ な ん ル 
ー ル が あり ます が , この ゲー ム で は 
カー ド を 並べ て いく だ け の 最も 単純 
な ルー ル を 採用 . 誰 に で も 楽し 〈 遊 
“52 7. 


スコ ッ ト は 7 つの 球 の 内 の 1 つ を 取り 出し , 
その 表 い 光 で フロ ント ガラ ス に アメ リカ の 
地図 を 描い た . スコ ッ ト は その 1 点 を 指し 
だ o UBI. XE 151 АР 
うな ずく . ЗН, 地球 訪問 の 任 を 終え た 


彼 を 母艦 が アリ ゾ ナ の メテオ ー ル 火山 の 噴 
火口 で 回 収 す る 手 は ず に な っ て いた . 

こう し も で ウィ スコ ン シ го а а тва 
の アメ リカ 横断 2 千 マ イル に も お よぶ , 2 人 
の 奇妙 な 旅 が 始ま つた …. 

4 年 が か り で この 映画 化 を 実現 し た 製作 
絵 指揮 の マイ ケル ・ ダ グラ ス は , 現在 アメ 
1330) hi NC C スー が ーー ヒッ lr 2 2) 
—" の 名 を 欲し いま ま 選 し て いる 名 プロ デ 
ュー サー で す . その ダグ ラス が 細心 の 注意 
を 払っ つて この 映画 の た め に 選ん だ 監督 が シ 
ョ ン ・ カ ー ペ ベン ター で す 。. 

ダグ ラス は ホラ ー ム ーー ビー の 第 一 大 人 者 と 
言わ れる カー ベン ター の 一 連 の 作品 に , #& 


この 映画 は 、 ゴ ー ル デン ウィ ー ク に 全国 で ロー ド シ ョ ー 公 開 さ れる 予定 で す . 


細 な 感覚 と 情緒 の 動き , 美しく 張り つめ た 
緊張 感 を 早く か ら 発 見 し て いて , これ こそ 
「 ス ター マン 」 を 愛 の 物語 と し て 扱う 重要 
な 要素 で ある と 確信 し て いた と いい ます . 

カー ペン ター は ダグ ラス の この 期待 に み 
ご と に 応え , SF ロマ ン の 体 靖 を と る この 
物語 を 近 来 まれ に 見 る 美しい ラブ ・ ス トー 
リー に 仕立 て 上 げ , アメ リカ 映画 界 を 驚嘆 
させ まし た 。 

この 映画 で 不思議 な 愛 を 体験 する 男 と 女 
に は ,「 天 国 の 門 」,「 カ リブ の 熱い 夜 」 の ジ 
で ツウ トブ リッ ジス と し イダ ー ス 内 科 和 あ 
た アー ク 」 の カレ ン ・ ア レン .。 プリ ッ ジ ス 
は 人 間 で あっ て 異 星人 と いう 技巧 の いる 役 
柄 を みごと に 体現 し て 新しい ヒー ロー 像 を 
作っ て いま す . 異色 作 の 異色 役 続 き の カ レ 
アレン も こる は RO NC 
か わい い 女 を 印象 的 に 演じ て いま す . 
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に 感心 させ られ て し まい ます . 


БЖС ЫД 9. 


チャ ン ピ オ ン ・ バ ル ダ ー ダ ッシュ 。,。 
高い ゲー ム だ け あ っ て 面白 いで すね . 面 構成 や 岩 の 動 き な ど , жщ 


さす が に アメ リカ で も 人 気 の 


これ に 対抗 する の が 頭脳 4989"。 単純 な ゲー ム な が ら も これ だ け 
上 難しく, か つ 楽 し く ゲ ー ム で きる の は きっ と 作者 の セン ス が よい か 


Р 


ЕНІ 41989 à 
ІМ PC-6001(32K) /mk II/ PC-6601/SR, PC-8001mk 


II/SR 


超 難 解 バ ズル ・ ゲ ー ム 
の 決定 版 / 


先月 号 の パパ ー フ ェクト ・ テ クニ ッ ク ほ に 登 
場 し た の で , も う 皆 る ん 知っ て いま す よ ね . 
ミサ イル に 追っ か けら れ な が ら 旗 を 全部 取 
っ て 出口 か ら 脱出 する ,。 あの ゲー ム で す . 

€ 5, 遊び 方 は 実に 単純 な の で す . だ か 
らら ゲー な は と っ て や りや すい 。 と ころ が . 
な か な か 解け な い ( パ ー フ ェクト ・ テ クニ 
ッ ク の お か げ で 少 り は 解け る よう に な っ た 


アス テカ 
これ 1 つ で 一 大 小説 


PiO 編 集 部 で も 特に 人 気 が 高 い (“ドラ ゴ 
ジッ スベ スレ イヤ マー の フ デ ルコ ヨム きん が 賜る 。 
アス テカ の 謎 を 解く 電子 財 険 小説 シリ ー ズ 
第 1 巻 で す . 

この ゲー ム の よる は 人 と いっ て も 5 グラフ 
4 s> 2 し ょ よう 、 写真 か ら 画 像 入力 し た と 
思わ れる リア デル な 絵 。 そし て その 描画 スピ 
ー ド . £7, 画面 を いく つ に も 分 割 し て 表 


この 男 は 何者 だ ろう か ? 


門前 に た た ず む 男 . 


FM- 


7/77, X1 /C/D/turbo カセ ッ ト  \4.800 
PC-8801/mkII/SR ディ スク  X6,400 
リ デ アデ アクション 
か な ?)。 それ は エミ ー 号 に 対す る ミサ イ 
ル の 動き や 面 パ ター ン が よく 考え て 作ら 6 られ 
T u S Ds РГ +, 
ы, コン スト ラク ショ シン も 付い て いる 
Oc, 難し い 面 を 作っ て みて は ? きっ と 
パズル を 解く 以上 難し いと 思い ます よ . 


一 見 簡単 そう に 見 えま す が , こ 
と 難し い の で て す よ . いや ホン ト . 


Falcom 
PC-8801/mkII /SR, PC-9801F/M?2 
ЕМ-7/77 ディ スク (3.5,5 イ ンチ ) Ұ7.200 
アド ベン チャ ー 


示し て いる の て で て で, 人 や 物 の 動き が と っ て も 
自然 で す . 

最近 の ソフ ト 技 術 を ふん だ ん に 使っ た . 
と て る も 面白い ゲー ム で す 。 (49) 


ぐ 問 い 合わ せ 先 > 日 本 ファ ルコ ム ( 株 ) 
$5190 東京 都立 川 | 市 暑 町 1-19-3 


® (0425) 27-4121 


луу ІІ 


Р: 


古代 文書 発見 . ノ 
SAID 


マヤ 文明 の 謎 を 解く カギ と な 


くく 問い合わせ 先 (株 ) エ ニッ クス 
49160 東京 都 新宿 区 西新 宿 7-1-8 
® (03)366-4345 


Жаршы 
リリー ロロ tamu 
ЮЕ ш шш и] ы ШШ ШШ 


いっ た い ど こ か ら 手 を つけ た ら 良 い の で し ょ う 。 
まず は 左右 か ら 2 番 目 の 旗 を 取る べし . 


EEEE 

Heb E 

CN LI 
° Ë E 


Tt t Hof Ер р 


た ぶん この ゲー ム て 一 番 難 し い 面 . 
ア で きた ら た いし た も の で す 。 


これ を クリ 


バッ と いぶ 、 り 向い た アニ ー 嬢 . 
画 の た ま も の . 


この 効果 も 高速 猫 


洞窟 の 中 で 発見 し た 偶像 . 彼 は 私 た ち に 何 か を 


教え て くれ て いる よう だ が …. 
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Sonic BOOM -- „+: а 。CoMPAc 


m +Z | (54: F) Ұ5,800 
形態 変形 戦闘 機 で 巨大 基地 を や つつ けろ / TE а ы 


あな た が 乗る XT-1I は , 空中 攻撃 モー ド の よる 5 見逃せ ま xA. 
と 地上 攻撃 モー ド を 持つ 2 形態 変形 戦闘 機 . 複雑 な 攻撃 パタ ー ン , 空中 一 地上 の 変形 
これ に 対す る 敵 メ ロー ザ は , 東西 南北 に 6 シー ン の リア デル きる きる など, E TEHIL 
エリ ア の 広 さ を 持つ 惑星 で , 機甲 戦士 Lc АС. (©) 


大 移動 基地 高速 戦車 な ど 47 種 の 強大 な 兵 | ぐ 問 い 合 わせ 先 > (株 ) コ ム パ ッ ク 
中 を 誇っ つて いま す . また , 飛行 パタ ー ン や | тісі 東京 都 渋谷 区 代々 木 1-37-1 
移動 パタ ー ン も 合わ せ て 60 種 以 上 と 機動 力 ぜん らく ぜん 5E ТЕ(03)375-3401 


ае я UU124$0U M 


地上 攻撃 モー ド そ の 1. ik DEER I Em 空中 攻撃 モー ド そ の 1 . 敵 が 地上 と 空中 に いる 
GU 
マ d 4 ? ; ТҮ d dide 222. 4-4 eo 
CHAN COMPA 
PC- TP ^» dia 
2 X1/C/turbo 
“ 4 9 / 3 ү , 

あの パ バルジ Eoo カセ ッ ト \4.800/ デ ィ ЕРТ 3 Y 6.800 
バー ジョ ン ・ ア ッ プ / リア クシ ョ ン 
PiO 84 年 10 月 号 で 紹介 し た バル ダー ダッ る な ど が 大 活躍 し て いる よう た 。 に AN 
シュ が , より 強化 きれ まし だ . ほら 穴 は A Š, フフ アイ アデ ・ フ ライ を ググ ま (本 わが ks も 
ーP ま で の 16 種 。 レベ ル は 5 段階 . し か も 解け な い 面 や , 逆 に 使い すぎ る と クリ ア で 
ほら 穴 , レベ ル は 最初 に 設定 で きま す . қ МН; ЕНЕ, さら に 難し く な っ て 
公 回 の バー ジョ ン で は , 前 回 より ファ イ tI, (49) 

ア ・ フ ライ ( 岩 や ロッ ク フ ォ ー F が 触れ る ぐ 問 い 合わ せ 先 テ (株 ) コッ プティ ー タ 

と 爆発 する ), アメ ー バ ー( 時 間 が だ つと 増 $5102 東京 都 千代 田 区 隼 町 3-19 


Ad 5. 岩 で 囲む と ダイ アモ ンド に 変わ ® (03)234-8041 


OOO 65 65 69 C 1. € 
төзе тетир 


+ で な た な な f$. 

че фе А 
9799777777779734 бя 
ーーーーーーーーーー* 6s 


"At lt lt е ets 


ッッッ タタ ッッ ッ タタ スン クス 29 1 
KE M res 4670747676766 ФЬ. 
2992700; 222028221 
275772005290 AC 
2797277922224222222% 


大 量 に ダイ アモ ンド が あり ます が , 取り 方 に 注 空中 に いる 石 が どう 落ち て いく か 見 守っ て いる 
か も や っ され て し まい ます - BIN POMA CER. 


VEHICLE ESSET | 
LAGRANGE LE- X 1 /C/turbo 
カセ ッ ト Ұ4,800 


本 格 的 ハー ド SF 上 アド ベン チ ヤ ー アド ベン チャ ー 


ы кызы ene b 着い だ の は , ب‎ ДАРА が 付き ませ ん が ) な p. っ ニア お だ は で な く 
ー タ の 異常 に ょ り 破 壊す 前 の コロ ニー 初心 者 で も 安心 し て 遊べ る 親切 設計 の ゲー 
L2. 最初 の 難関 は コロ ASMENS E ES A+. ini 
酸素 が 切れ る 前 に コロ ニー 内 に 入ら な けれ | ぐ 問 い 合わ せ 先 > (株 ) コ ム パ ッ ク 
5 amu тісі 東京 都 渋谷 区 代々 A1-37-1 
論理 的 な スト ー リ ー と 解法 は 今 ま て に 人 ぜん らく ビル 5F 
いも の . し か も , 画面 内 な ど に 隠さ れ だ い 1% (03) 375-3401 


くつ も の ヒン ト ( ち ょ っ と 見 た だ け で は 気 


jj^ 


0715 559 "(8 249-4197 10 (tipa: 99 9f) vr uisum inr 


この ゲー ム 最 初 の 難関 . 残り エア ー が 少な い . ガラ ス の ドー ム に 履 れ た エス カレ ー タ が ある . 
暗証 番号 は いく つ ? この 上 に は 何 が ある の だ ろう . 


空中 攻撃 モー ド そ の 2. 英 の 攻撃 が これ ほ と 激 
し いと 。 クリ ア す る の が 難し くく なる, 


NM ь À Á Á ` S à А マツ کے‎ 5. “ 
る で や で る る る で で を る る る 5777777 


Y ETE Ж 
nni muc ІНЕ 


ファ イア ・ フ ライ の 大 量 出 演 ./ 彼ら を 無視 し 
go. ÉE = FERT ゴー ル は どこ に 2? 
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PiO10 


BACKGAMMON EXCELLENT 


Tecno Soft 


PC-6601/SR, PC-8001mkII/SR, PC-8801/mkII/SR 
FM- 7 /77, X1/C/D/turbo ディ スク (3。 8.5.5 イン チ ) 


長く 楽し め る 
バッ クギ ヤ モ ン ・ ゲ ー ム 

コン ピュ ー タ 柚 手 の ゲー ム と いえ ば 。 や 
は り 相 手 の 強 る が 気 に な り ま す . “саз 
で の マイ コン ・ ソ フト の 中 で は 最強 L 
自信 だ た っ ぷり な テク ノ ソ フト さん で し た が , 
な る は ほど, 私 な ど で は まる で 歯 が た ち ま せ 
А, し か も 強 る も 4 段階 ある , 自分 で サイ 
コロ を 振る こと が で きる , ゲー ム ・ ボ ー ド 


oo тЁ=ббоо 7 
PE 上 コル つり = な 


_ ВЕТ=-4000 


上 の 3 枚 さ えな けれ ば 私 の 勝ち は 目 に 見 えて い 
る の だ が …. 


愛す る フィ アン セ の だ め 
遊園 地 中 を 歩き 回 る の で し た だ ….. 


遊園 地 の ど こ か に 隠さ る れ た 邸 の 権利 書 . 
これ が な けれ ば 結婚 後 の 新居 は お ろか , 2 
ィ ア ン セ と の 結婚 すら 遠のい て し まう . だ 
ПЕ, それ も あな だ た だ の 浪費 癖 を 心配 し た 親 
友 ( フ ィ ア ン セ の 見 ) の や る し い 心 づか い だ 
と 思え ば … ? 

これ を 拾っ て あれ を 捨て , それ を こう い 
うふ うに 使っ て … と 本 格 的 アド ベン チャ ー 


#7" の UN~ 2 ヨコ ノ 592 74570 カイ テア ル 。 
ok. 

223% Ef" sz А 
“ОРУ コノ КҮ?) CIN ユウ ェ ン チノ キカイ シッ 554, 


ユウ ェ ン チノ イリ グー ナカ 7% 


"お金 落ち て な いか な ぁ ", 
つや つく の で す が …。 


と 入り 口 付 近 を ぶら 


^ 72: a ا‎ 
芦別 市 テキ ナシ 4 


ES 
1 ЖБ 


PH 


à 


市 みな みり ょ うこ 


MZ-1500 QD 7,900 
(バッ クギ ャ モン ・ ボ ー ド 付き ) 思 考 型 


と し て 使え る (で エック ギヤ モン ・ ボ ー ド ま 
で 付い て いる /) な ど 。 t-< XUI: Eo 
tT. 

残念 な こと に この ゲー ム は 2,000 本 し か 
発売 され ませ ん が , 運 よ く 見 付け た 方 , 絶 
対 に お 買得 で す よ . (45) 


i MEC 


T „ЮЕ Ж = Оо 


CY 


"6 の ダブ プリ ング で 一 気 に 形 勢 送 転 ノ ナン テ 
コッ タイ 。 


Star Craft 
PC-8801/mkII/SR, PC-9801/E/F/M2 
FM-7/77, X1/C/turbo 
ディ スク (3.5、5 イ ンチ ) Ұ9,800 
アド ベン チャ ー 
な の は 今 ま で どおり . 今回 は それ に 加え て , 
英字 と カナ が 使え て し か も 混合 入力 (た と 
ん た ば LOOR キッ プ の よう かな) も でき 
боз ЖРА これ で 入力 が ぁ & ら に 
楽に な っ だ の は いう まで も あり ませ ん . 
(85) 
(Шаян) (株 ) ス ター・ ク ラフ ト 
80170] 東京 都 豊島 区 雑司 ヶ 谷 3-22-3 


《 問 い 合 わせ 先 》 (株 ) テ クノ ソン フト 
49857 長崎 県 佐世保 市 福 石 町 4-14 


2 (0956)33-5555 


気 を 取り 直し て も う 一 戦 . 相手 が 動け な い 状 態 
が 続く ザマ ー ミ ロ ノ 
R mou 


ro 
P" BM | mt. =SGoo_ „ВЕ *-o0o0g9 
CJ 


ШШ 


ШШ 


と ころ が ,。 逆 に バー に 落と され て この ザマ 。 o 
う 少 し で 勝て た の に / ノ 


FUNHOUSE MYSTERY 


122 (03) 988-2988 


射 的 場 に て . こん な と ころ に 権利 書 が 落ち て い 
る な ん て 考え られ な い が 。 TE? 


メリ ー ゴ ー ラ ンド の 馬 に で も 乗っ て 次 の 作戦 を 
考え て み ま す か 、. 


М 
7% 
77 
| ^ 
5 


すべ り 台 の 下 に いる 人 魚 . ちょ っ と 話 か け て み 
る の も いい か も 。 
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次 号 か ら は , あの 魔女 モ ヘ へ カ の 館 " や 
" 珍 さ ん 麻雀 "で お な じみ の 高嶋 晃 さ ん に 
よる , 乙 80 マ シン 語 入 門 講 座 を 始め ます . 
そこ で , 5 月 号 で は それ に 伴っ て 必要 に な 
る ニモ ニッ ク と マシ ン 語 の 対応 表 を PiO 読 
者 の 皆様 に プレ ゼン ト し ます . 


各部 人 負 系 の カラ ー 
baden aanak IE 
| — HEADERS A T 
比較 , 制御 命令 系 2 ボー ト 和 命令 系 
交換 , ААА その 他 の 命令 
クロ ッ ク 数 に つい て 


表 中 の 各 ニ モニ ッ ク の 右 横 に ある 数 字 は 
クロ ッ ク 数 を 示し ます 。 数 字 が 2 つ あ る 場 
合 は 上 が 条件 成立 時 , 下 が 条 件 不成立 時 の 
クロ ッ ク 数 で す DI NZ は 上 が B キ 0, 下 
が B =0). 

実行 時 間 (T) の 算出 に は , 以下 の 式 を 使 
vb. 


ECT CFRE 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 
А 
B 
C 
D 
E 
F 


7 
4 


T= (1/f) x Z n > Z 3⁄2 


f は CPU が 動作 する 周波 数 で 機種 に よっ 
て 違い ます が , 4MHz 前 後 で 動い ひい て いる も 
の が ほとん ど で す .。 で すか ら 通 常 は 。 4 ク 
ку ЖІ ЖЕКЕ Жа C usus CD x. 

な お , ハード ウェ ア の 割り 込み が ある 場 
Жа, この 式 で 求め た 時 間 よ り も 実行 時 間 
¿ms b У. 


DD, FD4 58s $t 


頭 に DD の 付 〈 命令 は IX レジ スタ に 関す 
る 命令 で す . 表 中 の 太線 で 囲ま れ た 命令 の 
頭 に DD を 付け る と HL レジ スタ に 関す る 命 
令 が IX レジ スタ に 関す る 命令 に 変わ り ま す . 
⑩H ロ HL レジ スタ が (HL) で は な く ,HL と いう 
形 で 使わ れ て いる も の 全部 と JP(HL ) と い 


A < 
79786713 


DD を 付け る と , HL レジ スタ の 代わ り に 
хт AX PMI S EloI, 


R1 ニモ ニッ クー マシ ン 語 対応 表 


ENERO Eae. 6 

LD (HL) B 
LD (HL) C 
LD (LD 7 
АСЫ ' 6 |mcsb 6 LD (HLE 7 
LD (HLH 7 
LD (HL) L 7 
10 HALT 4 


B 


Ў 4 

ШАС 
4 
4 


' 


Ек 

ine] 

ぐっ | で う 1 ぐう 

e 

> 

ж; 

= 
1 Pat 

сә 

> 

Ез 

e 

まこ lk 

3 

E 

2 

> 

e 

> 


ü С | D 1557 
RETNZ P ЕТІС | BET IO 
1 


Pl E5 : PUSH HLDD. E5 : PUSH IX 
E9: JP (HI) —DD, E9 : JP (IX) 
@JP(HL) 以 外 の すべ て の (HL) が 使わ れ 

て いる 命令 


DD を 頭 に 付け る と, (HL) —(IX-*Qq) に 


Abu 
£l 34 :INC(HD) -—DD,34,d 
: INC (IX +d) 
36,п: 10 (НІ), n > DP; 36, а, п 
: LD (IX +d), n 


注 :d.n は それ ぞ れ 1 バイ ト の 数 値 

な お , クロ ッ ク グ 数 (ТА 7 —– К) ФАО 
命令 の と き 十 4 クロック,。 @ 系 の も の は 2 
イト 目 が CB の と き 二 8 クロ ッ グ 。 それ 以 
外 の と き は 十 12 ク ロッ ク 元 の DD を 付け な い 
命令 より 増え ます . 

FD が 頭 に 付く 命令 の 場合 は , IX レジ ス 
久 が IY レ ジス タ に 変わ る 以外 は DD が 頭 に 
付く 命令 と 同じ で す . 

例 DD,7E,d: LDA,(IX+d) 一 
ЕР, 7E,d : LDA, (IY +d) 


| 7 


u 
7 


LD(HL),A 7 


ii 


МЕЗІ? 4 (1041, 


TO 


Рәш 10 JPNCm 10 JPPOm 0 Ри 10 


CALLNC,m Ú | CALL PO, mn 17 CALLP,m Ü 


RSTH 11|RSTIH 11|RST2H 11|RST9H T 
CP B 4 | RETZ P | RETC £ RETPE ВТМ 


CPC 4 | RET 10 : 
нша 10 PPhm и 1 
B ` | | 

1 


B CPD 4 JZ n 
СОИ сн 4 | CALL Z, m 


CALL Са 0 


.] JP (HL) 4 [LDSP,HL 6 


| CALL PE, nn n 


7 19. 
10 ーーー 


CP (HL) 7 


CPA 4 | RSTOSH 10 


RST18H 10 RST28H 10| RST3H 10 
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Де, 


св+ R2 ニモ ニッ クー マシ ン 語 対応 表 ( 頭 に CB が 付く 命令) 


| 
RLC (HL) 15[RL HL) — 15| SLA 


| 

ЖАН в зн 

SRAL BN 
RRC (НІ) 15|RR HL — 15|SRA(HL) 15| SRL. 
е ic. sm sS SÎMA 


тШ OLOT > |хо | со | ol бл | > los [ss | = | © 


E | 


C | » | F 
8 8 
| 8 


8 | 9 О Ж | 
8 8 8 8 8 


位 B 
9 
, 
, 
, 
y 


RES 0, (HL) 15 | RES 2(HL) 15 RES 6, (НІ) 15 | SET 0, (HL) 15 SET 6, (HL) 15 
STD в 
STLE 8 
8 8 8 8 「 8 
| 1 15 
| 8 8 


9 ) 19 
8 
RESLL B КЕЈТ RES 5, L ШЖӘТІ 8 51. SET AL SETA L SET 7 し 8 
MSL HL) 158 1 RES 3 (HL) 15] RES 5 (HD) 151 RES 7, (HL) 15 | SET I, (HL SETS ШІ) 151 SETS (HL) 15] SEIT, ІНІ) 15 
RES 1А 8 | RES 3 A 8 | RES5,A 8 | RES7, A 8 | SETI, A SET 3, A B 2195. SEILA 8 


ED =з ニモ ニッ クー マシ ン 語 対応 表 ( 頭 に ED が 付く 命令 

. A ОИСЕ СОВЕТІ 
| 
| 


5 
APEGO BR 0во RIDEU 12 16 | LDIR IET 


注 1 : BC キ 0 の と き 21. 
BC= テ 0 の と き 16 

注 2 : BC モ 0 か つ 
A キ (HL) の と き 21. 
BC = 00 š 7- (5 
A=(HL)@ £ š 16 

EO. Ses В А каме 1% 。 
n は 1 バイト, nn は 2 
バイ ト の 数 値 を 表わし 
ET. 
e (4 —128—127@ 2 0) 
補 数 を 表わし ます . 


| 


TOB I2 ОТОР I2 OST O H 12 CP 16 | CPIR [1:2 
| SBC _ IN 16 | INIR 注 1 
LD (m), SP 20 | OUTI J Op Hi! 


LD (mm), DE 20 
шн 7, 
12 


— s: Nc 12 NEO осо 12 
ТШШ? 
16 


LD BC, (m) 20|LDDE (nn) 20)  |LDSP,(m) 20| OUTD OTDR 1 
ж. д 
ша 91DAR 9% j| 


МАН 12/1 16 | LDDR i1 
A 12 
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サー チラ イト を 使っ て , 夜襲 を か け て く 
ШЕНІ, 撃墜 する ゲー ム で す . 

3 基 の サー チラ イト と 2 台 の 対空 砲 を 効 
sk < BRÍFL C, 爆撃 か ら 都 市 を 守っ て く 
だ さい . 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


| マシ ン 語 8100~BA7B 
スタ ー ト 8100 

ETT 

= = ә 

> > 

BUSES 7-7; U LIT SB & # V BE 
に 当たっ た と き ,。 な に か 当たっ た と 
いう 表示 が ほし いと 思い ます . サー 

- チ ライ ト は な か な か 面白 い ./ 


еы ` 


ォ ー ル ・ マ シン 語 で ,。 アド レス は 8100H 


ーBA7BH で す . モニ タ の S コ マン ド な ど 
で 打ち も 込ん で て だ きい 。 S mi uapa 27 
ログ ラム (85 年 2 月 号 な と ど ) で チェ ッ ク す 
ム を 確認 し た ら , W コ マン ド で 8100Hー 
BATBH ст ә $ U 


> 


2. 


„=; 


モニ タ よ り @81OO| RETURN | と する と , 
タイ トル と 簡単 な デモ , スコ ア の で スト 5 
の 表示 が 繰り 返さ る きれ ます . そこ で お も むろ 
に | RETURN | キー を 押す と , サイ レン の 
音 と と も に ゲー ム が 開始 る きれ ま す . 

敵 は 全部 で 4 FEIT, その うち の 2 種類 
が ある 地点 まで 達する と 爆弾 を 投下 し 始め 
ます . 爆弾 が 都市 の 両端 に 命中 し た と き は , 
少し 破壊 きれ る 程度 で す が , 中 心 部 に 命中 
する と 完全 に 破壊 きれ ます . 

だ だ し 大 型 の 爆弾 は どこ に 命中 し て も, 
完全 に 破壊 きれ ます 。 まだ サー チラ イト に 
命中 し た 場合 は , ライ ト が 消 を ぇ 一定 の 時 間 
使用 不能 も となり ます . 

味方 の 攻撃 は , [A], [s]. [P| キー まな だ 
iz, |@RPH | キー で ライ ト を 移動 し て 敵 機 


を 探し , テン ・ キ ー の [4|, [6| で 対空 砲 を 


する こと に より 行なわ れ ま す . 232, ДОШ 
の 種類 に よっ て 1 一 4 回 命中 し な いと 撃墜 
СЕ ФА. 

対空 砲 は は | カナ | キー を ロッ ク す る こと で 
連続 発射 で きま す が , 撃墜 し た く な い 敵 機 
まで 撃 呆 し て し まう こと が 多く な る の で 
な る べく な ら |SPACE| キ ー を 使っ た 方 が い 
Кау E BE И 

こう し て 都市 を 守り , 英機 を すべ て 撃墜 
する と 1 面 が 終了 し , 残っ た 都市 に 応じ て 
ボー ナス ・ ポ イン ト が 与え た られ ます . 


ョ の ゴツ 


⑱ と に か くべ く 爆弾 を 投下 る れる 前 に , 撃墜 す 
る ( あ だ り まえ ぇ だ 一 )。. 

@ 初 め に 爆撃 機 以外 の 敵 機 を 撃墜 し 過ぎ る 
と , 後に な っ て 爆撃 機 が 編隊 を 組ん で 出 て 
き て, 防戦 不可 能 に な っ て し まう の で な る 
べく 最初 は 爆撃 機 の み を 狙い 繋 ち する. 
@⑧ 麗 の 攻撃 は 1 機 の と き は だ いし た こと は 


あり ませ ん が 。, 2 機 以 上 に な る と 強力 に な 
る の で 深追い し 過ぎ る と 返っ て 傷口 を 広げ 


b da $š tA, 新た に 来る 敵 を 攻撃 し まし ょ 
Р 8 
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Шоп» СЕН Sh, ゲー ム が 終了 し 
UNDA FPA めで だ く ペ スト 5 以内 
の 場合 は , 10 文 字 以 内 で 名 前 の 登録 が で き 
id. キー ボー ド か ら 入 力 で きる 文字 は す 
べ て OK で , 間違え を た と き や 最 初 か ら 登 録 


し 直し た いと きせ は | DEL |, [HOME/CLR) 


9900--990Ғ | DE に より 示さ れ た 文字 列 の 出力 
99E0—99E8| A レジ スタ の キャ ラク タ を HL 
。 | の 座標 へ 出力 する 


9A17—9A83 | HL で 示さ れ た 座標 を V-RAM 
。 。 。 | アド レス に 変換 する 

9A34…9A84 | サフ 画面 の クリ ア 

9A85—9A96 | 初期 画面 の 設定 


を 押し て 再 入 力 し て くだ さい . 


を 押す か , 60 秒 た つと 登録 が 終了 と な り ま 


す . 


プレ イ 中 に | ESC | キー を 押す と 一 時 停 
止 で , | SPACE | キー を 押す と プレイ 再開 
CT. #7, | CTRL |+|5| キ ー で サウ ン 
К の ON/OFF, | SHIFT |+| STOP |С х 
イト ル ん 画面 に な る の で , ゲー ム を 途中 で や 
り 直 し た く な っ た と き は これ を 利用 し て < 
だ な いい | б 

8109H—8618Hiz X 2 22 - 3— FO 
20H か ら F7H ま で の キャ ラク タ ・ デ ー タ が 
6 バイ ト 1 組 で 入っ て いま す . この デー タ 
作り に は と て も 茜 労 し た の で , 使わ れず に 
埋もれ る の は 少し も っ だ いな い の で 使い た 
い 人 は 使っ て くだ さい . 


へ 


この ゲー ム , 少々 簡単 すず た よう な 気 も 
し ます が 。 弟 難 度 の ゲー ム が だ くる ん 出 て . 
いる 昨今 。 こ ん な ゲー ム が あっ て も いい の 
で は な いで し ょ うか (実は これ で 精 一 杯 だ 
っ た り し て …). 
参考 文献 
1) “PC-8001 マ シン 語 入 門 II", 電波 新聞 
社 
2). “"Z80 マ イコ ユン プロ グラ ム テ クニ ッ ク 
電波 新聞 社 | 
3) “PC-8001 マ シン 語 ハ ンド ブッ ク ( 初 級 
н)", 秀和 シス テム トレ ー デ ィング 
4) BEPC, "RIVER RESCUE", = 


イィ コン ゲー ム の 本 [4|、 工学 社 ` À 
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p 3 月 号 の p.76 の 人 と 同じ で , 僕 も 安さ に つら れ て PC-1245 を 買い まし た . あま り 役 に 立た な いと 思っ て いた ん で すけ ど 。 隠れ コマ ンド の 
お か げ で セミ グラ フィ ッ ク が 使え 、 マ シン 語 の プロ グラ ム も 組め る よう に な り 、 牙 き の 連 続 で し た . 入試 10 昌 前 な の に この よう な ハガキ を 箕 
いて いる 場合 で は な い の で す が 。 10 日 前 に 引越 し た ば か りな ん で す .。 も ちろ ん 転校 し 前 の クラ ス の 友達 と も 別れ まし た . こち ら の 学校 は 前 の 
"者 以 に くら さか な り 荒 れ て いま し た . を それ て 余計 に 前 の 学校 に 戻り た なく な り ま し た . UL, へ こ だ た れず 残り 少ない 生業 まで の 日 々 を くい 
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の な いよ ょ うに 過ごし て 行き た いと 思い ます . Р51 PC-1246 が 出 て し まっ た . 機能 が アッ プ し た うえ に 値段 が ド が る な ん て . Р52 や は 
9 PC-8801mk II /5001 mk II に SR が 出 だ . 
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P 昨年 の 11 月 に 愛 機 の PC-1251 が 死ん で し まっ た が つい 最近 復活 し まし た . 修理 に 出し た の で す . さて 「 作 業 報告 書 」 な る も の に よる と 
š TREE, 抵抗 半田 修正 」 ほ と いう こと で し た . し か し 4.7K は 高い … と 思い つつ マシ ン 語 の プロ グラ ム を 入れ て RUN す る と, 俗 に いう 禁足 …. 
「 ん な アホ な ./ リス ト を 15 回 も 見 直し た の に …. 修理 前 は 動い た ん だ が …」 TAUCÉEECPEEK&7FFF| RET |。 する と 240. 数 分 問 何 も 言え ま 
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せん で し た . 修理 前 は 「0」 つ まり 中 バー ジョ ン だ っ だ の が …. 「 そ うか / 上 昌 バー ジョ ン の PC の 本 体 を 清掃 し て 半田 修正 する と 新 バ パー ジョ 
ン に な る の か …」1 人 思う 私 で し た . ・ M ЭЖИ 
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ABBO 77 23 13 10 F9 C5 @1 73 90 


ーー 


すみません, 初め て 出す くせ に 昭和 59 年 の お 年 玉 年 賀 ハ ガキ な ん か て 出 し て し まっ て (これ て 載る 確率 は ダウ ン ). さて 僕 は 、 あ る デメ バー 
で PC-1250 を 買い まし た . Ж, な ん と 6.800 だ っ た ん で す ( 新 品 )、 で も や っ ぱり 使っ て て メモ リ の 少な さき に 困り まし た . せめ て PC-1251 
Y ら 5 らい ほし いと ころ で す . だ れ か 増し 方 を 教え て くだ きい. それ か ら 編 集 部 に 質問 . 最近 ペー シッ クー スタ ーJr. の プロ グラ ム が 載っ て いな 
012, どう し た こと で すか ? 載せ て くれ な い の で は ? | 


Sum ҒА A8 19 А5 9C SD 


edd жа +1 +2 +3 +4 +5 
BE499 7А CD EO 99 24 24 
В410 EO 99 24 24 24 79 
B4260 SE Әр 96 дь DD 7E 
B430 ЕЗ C9 CD BS 9A ES 
B440 ES 21 160 27 CD C9? 
B450 26 16 2E 91 11 C7 
B460 ЗЕ 06 26 00 DD 6E 
B479 24 DD 23 DD 25 DD 
раво оо CD EQ 99 DD 23 
в490 CD EO 99 24 24 24 
B4A9 11 D4 92 CD D9 99 


add +© +1 +2 +3 +4 +5 
B500 49 B4 26 ӨЗ 2E 17 
B510 FO BS ES CD 4C 16 
B520 FF ЗЕ 20 96 ФА DD 
Н520 24 24 24 24 ES Фё 
B540 F8 El 66 OA ES CS 
B550 28 64 ЗА 76 EA CD 
B ら 6 の 1D CD C9 9^ ЕТ FE 
B570 2F FE 20 38 CF FE 
B5806 99 24 24 24 10 BE 
BS59@ 99 24 24 24 19 ЕВ 
B5Q9 78 FE да 28 9F DD 


BS5Be CD EO 99 @4 18 ВЕ 3 


BODOG бө 20 20 CD DS 94 
B6EOG %3 ЗА FC 94 А7 28 
Bo6F9 DD 74 08 11 99 oo 


а а 


札幌 市 いろ べ よ う 


(ウォ ッ チ マン CAN) 
жй с ДАТЬ О ЁЗА, 


どん どん 投稿 し て くだ さい . 


із 


+Е бит Add жо 
ФА :7F E700 Sñ 
DD :FHB B7160 O4 
оо :DF B720 2C 
94 :ВЕ B736 өз 
SE «2С B740 o0 
24 :DO В750 B8 
OA :8F B760 7F 
99 :79 B770 94 
ж 78 B780 CF 
ЗЕ :52 E790 46 
во :82 B7ño CD 
9A4 :Dé B7BO А7 
01 36 B7CO 24 
14 :DB B7DO 90 
48 :F4 B7EO6 9D 
3 {94 HB フ F の 99 
C9 :АЗ Sum 7H 
*F Sum Add +о 
CD 9E рвоо o9 
51 『DC | BB19 СЕ 3 
16 :64 B820 3D . 
QA : Бе вао өр 
Аё :FC E840 18 
oS ES B850 32 
24 :1Е EB69 CC 
7E «4С B876 5р 
aS :С5 E880 ES 
24 :73 ВВ90 ES 
BO :6E B8A0 3E 
F5 :80 EBBO 1A 
72 :22 ESCO 1A 
02 :4B B8Do 77 
FE :2 EBEG 10 
CD sFB BBF@9 DS 
А2 :8F Sum 9C 
+Е бит Add +0 
CD :5р B900 FC 
ФЕ :Сё B910 2C 
El :6A B920 DS 
10 112 B930 4F 
61 :B4 B946 6F 
AÖ :B7 B95e СВ 
28 :B8 B969 СВ 
EO :46 B970 3A 
EO :68 B980 94 
C9 :7E в990 өр 
8D :BC водо 28 
Fé :06 в9во 32 
る 4 CO B9Co 95 
7B :9A E9De A2 
C9 :96 B9EO CD 
19 : 6B B9Fo 90 
92 :7B Gum 2А 
+F Sum Add +0 
Ei :3B PAG AF 
58 :04 BA16 CD 
CD :24 BA26 54 
3E :9E BAZO 63 
2С :3В BA4G CD 
СӘ ES BASO 41 
9A :D1 BA69 CD 
2А :92 BA70 DE 
ТА : ФА 
рр :84 Sum 9С 
FE :BF 
Ol (СЕ 
BE :EE 
28 :54 
07 303 
34 :Е6 
30 :2Е 


Erb 


寝台 急行 "安芸 」 


E3 


+6 +7 +8 
64 CD 1E 
B8 2E 08 
eg 11 ҒО 
54 5р СВ 
78 99 19 


CD 1E А6 


20 


C3 


FB 


+в 
19 
24 


e 
62 
1B 
B6 


+C 


eo 


*D 


FF 


eo 
СӘ 
ор 
eo 


+F 
2E 
Ab 
2E 
31 
во 
CD 
FE 


+Е 
BO 
21 
FE 
FF 
21 
ФА 
20 


FF 


Sum 


: AD 
sFE 


DE 94 98 11 11 B7 80 60 


yA 


10 


Ав 


:C5 


os1 ` 
BASIC+ マ シン 語 


a 


1 今月 の PiO な ゲー ム 


? 


ау 
>i O 


‚Ай. EE 


2 ーー 
М ë 
eo A うっ 


今日 も 来 ま し た 爆弾 魔 . あな た が 勝つ か , 


相手 が 勝つ か ? 


その 行方 は …. いざ , 勝 
負 ノ ! 


8H7n772-77zz»*—a- 


2000--3570 
2000—6310 
2640--2ЕА6 


アイ デア が いい で すね . た だ ちょ っ 
と 難し すぎ ます . も うち ょ っ と や さ 
| し く て も よかっ た の で は ? (V) 


電源 ON 後 、 NEW ON 1| RETURN |2 3 
fî L, CLEAR, & HOOOO| RETURN | と し 
ます . な お な お, この ゲー ム は ディ スク 版 で も 
増設 RAM は 必要 あり ませ ん . 

まず リス ト 1(BASIC 部 ) を 入力 し , 
“CRAZE” の ファ イル 名 で テー に モー 
Жо-асғ  жРАК ФСт-СУ УА: 
2000H 一 3570H) を や モニタ の E ビ コマ ンド な 
ETAJI し, BASIC ài O 1% i: SAVEM 
"IGCHR", &H2000, &H3570, & 
HH2OO8 と し て モー ブ し ます . そし て 最後 
に リス ト 3( マ シン 語 2000Н--6310Н) を 
入力 し , IGCHR の 後に 続け < SAVEM 
"CRAZEM", &H2000, &H6310, & 
H2748 と し て セー ブ し ます .… 

後 は RUN "CRAZE" で 2 つの マシ ン 語 を 
読み 込み タイ トル と ゲー ム 説 明 が 表示 さ 
ЎТ. 


H % 3 - 
e 


[SPACE キー で ゲー ム ・ ス ター ト で す . 


この と き パ スワ ー ド を 聞い て きま す が , Ж 
初 は | RETURN キー を 押し ます (1 面 クリ ア 
する ご と に パス ワー ド が 表示 る れる の で , 
次 回 か ら は その パス ワー ド を 入力 し て くだ 
きい ). | 

カー ソル ・ キ ー で 十文字 を 操作 し , 回 転 


な Pep 


の 物 が 多い で す ね . 私 は 自分 の 家 を も と に し か たか, 
プロ グラ ム ). や っ ぱり 私 は 根 暗 で し ょ うか ?7 _ 


メイ ン : 
表示 ルー チン (パタ ー ン ) 
カウ ント 

初期 設定 

パス ワー ド の チェ ッ ク 
デー ター パ バターン 

中 心 の アド レス を セッ ト 
キー 入力 

初期 画面 

TIME チェ ッ ク 
爆弾 チェ ッ ク 


人 台 や 移動 台 を 使っ て 爆弾 を 入れ 物 の 中 に 入 


оят. 移動 台 は 回 転 台 を 十文字 で 押し て 
や る こと に よっ て 図 1 の よう に 変化 し ます . 


だ だ し , 十文字 は 直接 爆弾 を 押せ ず , また 
1 回 に 動か せる の は 1 個 ど け で す . 

な お , 動け な く な っ た ら |@| を 押し て く 
だ る さい . タイ ム は その まま で す が , toii 
の 最初 に 戻り ます . 

そし て 時 間 内 に 爆弾 を 処理 で き な か っ た だ 


と き は , 爆発 し て 即 ゲ ー ム ・ オ ー バ ー で す . 


この ゲー ム の パパ ターン ・ エラ ディ AC. 
ー プ 版 の 方 は テー を 2 一 3 本 用 意 し て お なく 
と 楽に な が り ま す 。 ы 。 この エディ タ は 1 


メイ ン 

初期 設定 1 

各 メ ッ セ ー ジ 表示 

各 メ ッ セ ー ジ 用 キー 入力 
表示 ルー チン (パタ ー ン ) 
中 心 の アド レス を セッ ト 
デモ 画面 

初期 設定 2 

キー 入力 
デー タ *・ セ や セット 


c) 移動 台 の 向き だ け を 
変え た いと き 


置け な い 部 分 


_ 面 ご と に 画面 サイ ズ を 12x12。 16x16, 20 


X20, 24x24, 28 メ 28 の 中 か ら 選 べ , 最大 


С 42 面 まで 作る こと が で きま す . 7 


入力 方 法 

コン スト ラク ショ ン で 必要 な も の は 。 
リス ト 4 (CRAZEC : BASIC)、 リ スト 2 
(IGCHR), リス ト 5 (CRAZEMC: マシ 


このごろ の ゲー ム は , アド ベン チャ ー が 主流 に な っ て きま し た. 11 月 号 で も アド ベン チャ ー ゲ ー ム を 特集 し て いま ААА WAT 
ドド ベン チャー が 多い で すね . 私 は どちら か と 言う と テキ ス ト タ イ プ の 方 が 好き で す ( な ぜ カ と ょ いう と 場面 が 多い か ら )。 それ に 長い プログ ラム 
テキ スト アド ベン チャ ー を 作っ て 友達 に や ら せ る の が 趣味 に な っ て し まい まし た (当然 短い 


pio 


7i&;2640H—2EA6H, スタ ー ト ・ ア ド 


ンス は 2770H) で 。 この 順に セー し て < く 
M же —. d 

を し て リス ト 3(CRAZEM : z УЙ) 
の 2640H —2F06H を SAVEW “GM”, & 
H2640, &H2FO6, &H2748 と し て 一 
番 最 後に モー ブ プ し て くだ きる い (これ は 作成 
し た パタ ー ン ・ デ ー タ を ゲー ム ・ プ ブロ グラ 
ム と し て テー プ に セー プ す る と き に 使い ま 
す ). 


メニ ュー モー ド 

タイ トル 表示 後 , メニ ュー が 表示 る れ ま 
+. まず , 1(NEW) は メモ リ 内 容 を 初期 
化し ます . パタ ー ン を 作り 始め る と き 以 外 
は 使わ な いよ うに し て くだ る さい . 

次 の 2 (CHECK) は メモ リ 上 に ある フタ 
ー ン を CRT 上 に 表示 し , 修正 で きる よう 
に し ます . デー タ が な く な っ だ ら 画 面 サイ 
ズ の 入力 待ち に な り ま す 。 | 
3 (SAVE) コマ ンド は , 現在 メモ リ 上 に 


10 з КККК ОКК ККЖ ЖКЖ 
eee de eoe poo 
20 '* 
` * 
SO "ж CRAZE-S1 
* 
40 "ж 

ж 
SÜ 7 ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ 
ポポ ポポ ポポ ポポ ポポ ポポ ポポ 
60 ° SAVE CRAZE 
100 CLEAR, &HOOO0: PALETTE :WIDTH40: CLS 2:8 
=PEEK( &H2748) : IF =&H さ さ THEN 150 
110 LOCATE 10,12:PRINT" マシ ンコ ヾ 9 ロー トド ジマ ズ s 


120 LOADM"IGCHR":EXEC &H2008: LURDM "CRRZE 
M"s:sCLOSE:CLS 2 


1259.5. Чез 

130 FOR I-&HOO10 TO &HO148 

140 READ B$ . ' 

150 POKE I,VRL("&H"+B$):NEXT I 
1939 * | 


160 MIDTHBO : POKE &HFFDO, 5: PALETTE 0, 9: PA 

(ЕТТЕ 3,10:PARLETTE 6,1:POKE &HDOOO, O 

170 EXEC &HOO74:POKE &HFFDO, О: PALETTE 

o н 

172 CLS 2:СО ОК 7:LOCATE 3, S:PRINT " 
3 лет 子 さ カフ ナイ ニ ト 7” 


3 1 
シテ = 4v3209*""4." : 60508 3000 
173 LOCATE 10,6:PRINT " 子 ョ 9 セッ 

トワ すゞ キマ セン 。 " :6050В 3010 

174 LOCATE 3,8:PRINT " 7 チョ ワシ ンタ ヾ サテ 
レル Ж / ムキ ヲ カ エル トキ ワ ғ? 
オォ イト コロ с ゆり サテ チカ カイ テン サ セ マ ス 。" :GOSUB 5020 

175 LOCATE 6, 12:PRINT "ミキ ヾ カイ テン / トキ 9 90% 
スズ さり ж カイ テン シマ スズ 。 E9*Umn T» / トキ ワカ 
ワリ マセ ノン 。 ":GOSUB 3030 

176 GOSUB 3050: GOSUB 2150: GOSUB 3060: GOS 
UB 2150:GOSUB 3070:GOSUB 5090:0050В 2150 
:GOSUB 3100: GOSUB 2150:GOSUB 3120: GOSUB 
3140 š ) 
177 COLOR 2:1 ОСАТЕ 55,20:PRINT "PSHS [SP 

7 GAME ON":FOR 1=0 TO 2000:2$-INKEY$ 
178 IF Z$=" " THEN 181 

179 NEXT I 

180 GOTO 171 

181 ' 

190 EXEC &H2748 

200 PALETTE :COLOR 7:END : 
1000 DATA 7C,FE, 82,82, 82, 82, 82, 82, Có, 44, 
7E, FE, 90, 90, 98, 98, 94, 94, F2, 62, ЗЕ, 7E > 
1010 рата 48, CB, 88, 88, C8, 48, 7E, ЗЕ, 86, 86, 
BA, BA, 92, 92, A2, A2, C2, C2, FE, FE, 92, 92 

1020 DATA 92,92,92,92,92,92,64,F6,92,92, 

92,92,92,92, DE, 4C, 22, 62, 42, C2, FE, FE 


3» オス コ 


ある デー タ と CRAZEMC の プロ グラ ム を 
テー ブ ( デ ィ ス ク ) に モー グ し ます . 774 
ル 名 は CRAZEMC に し て くだ さい . 

を し て 4 (END) = コマ ンド で BASIC に 戻 b 
ます . ゲー ム ・ プ ログ ラム を 作る か どう か 
聞い て くる の で , [YINI で 答え て くだ き 
い 。[Y| の と き は GM を ロー ド し て 新た に 
CRAZEM の プロ グラ ム ・ フ ァイル を セー 
プ し ます . 


パタ ー ン ・ エ エディット 

ヵ カー ソル を 動か し な が ら |Al-[E|. [Z] 
で 置い て いき ます . だ だ し , 回 転 台 (Dー 
G) は 中 心 (C) の 上 下 左右 に し か 置け ませ ん . 
また だ 中 心 は 図 2 の 位置 に は 置け な いよ うに 
な っ て いい ます, 


ブロ グラ ム G め いて 


ゲー ム ・ プ ログ ラム も コン シン スト ラク ショ 
ン ・ プ ログ ラム も , ワー ク ( テ ー ブ プル 用 ) と 
リリ スト 1 CRAZE-S1 BASIC リ ス ト 


1050 DATA 02,02,02,02,FE,FE, 92, 92, 92, 92, 
92.92,92,92, FE, FE, CO, 50, 30, 18, ОС, 06 
1040 DATA FE, FE, FE, FE, 82, 82, 82, Có, 44, 44, 
38, 38, 33, BC, 89, 1F, 30, 1F, 8B, CC, BC, F1 

1050 DATA 10,3F,40, 09, 7D, DO, 00, 26, 13, CC, 
O3, 06, DD, оа, 8D, 2F, C6, 30, 17, 00, Q7, OF 
1060 рата од, ОҒ, 05, вр, 24, 39, 86, O4, B7, FF, 
D8, 10, 8E, 15, 22, 10, 9F, 00, 30, 8C, AD, Сб 
1070 рата 03, 34,04, 8D, 51, 35, 04, 10, 9E, 00, 
31,25, 10, 9F, 00, 5A, 26, EF, 39, D6, 04, F7 
1080 DATA ҒҒ, 08, 10, ВЕ, 10, F2, 10, 9F, 00, 20, 
вр, FF, 43, СЬ, 05, За, 04, Вр, 2D, 35, 04, 10 
1090 рата 9E, 00, 31, 25, 10, 9F, 00, SA, 26, EF, 
Dé, 05, F7, FF, 08, 10, ВЕ, 14,46, 10, 9F, 00 
1100 рата Có, 02, 34, 04, 8D, OE, 35, 04, 10, 9E, 
00, 31, 25, 10, 9F, 00, SA, 26, EF, 39, 10, 9E 
1110 DATA 00, сё, OA, D7, 02, Bé, 80, AS, 84, 27, 
08, 34, 02, 86, 87, A7, A4, 35, 02, 44, 31, A8 
1120 рата 50,34, 10, ВЕ, 00, 30, 30, 1F, 26, FC, 
35, 10, 4D, 26, E2, 30, 01, 10, 9E, 00, 31, 21 5 
1130 DATA 10, 9F, 00, Cé, 02, BD, 05, OA, 02, 26, 
CE, 39, 24, 36, BE, 10, 00, 30, 1F, 26, FC, 5A 
1140 рата 26,Ғ6,25, 56, 59 

2000 COLOR ,,1:ҒОН Y1=O TO 1 

2010 FOR X120 TO 4 

2020 LOCATE Х+Х1, Ү+Ү1: РКІМТ СНАФ (A) 

2030 QA-20*1:1F A-&H7F THEN A=A+1 

2040 NEXT X1 


.2050 NEXT Y1:COLOR 7 


2060 RETURN 

2100 FOR Х=5 TO 20. 

2110 FOR Y=15 TO 21 

2120 LOCATE X,Y:PRINT CHR$(C&H20) 

2150 NEXT Y:NEXT X:RETURN 

2150 FOR I=0 TO 300:NEXT:RETURN 

2200 FOR X225 TO 40 

2210 FOR Ү=15 TO 21 

2220 LOCATE X,Y:PRINT CHR$(C&H20) 

2230 NEXT Y:NEXT X:RETURN 

2250 FOR Y1=O TO 1 

2260 FOR Xi=0 TO 4 

2270 LOCATE X«X1,Y*Y1:PRINT CHR$(C&H20) 
2280 NEXT X1:NEXT Y1iRETURN 

2300 ” 

2310 FOR Үі=0 TO 1 

2320 FOR X120 TO 15 

2330 LOCATE X«X1,Y*Y1:PRINT CHR$C&H20) 
2340 NEXT X1:NEXT Y1:RETURN 

2350 ' 3 

5000 Х=5:Ү=2:Я=&Н20:6050В 2000:Х=24:Ү=2: 
Q-&H3E:GOSUB 2000: X= さ 1 : Y=2 : =&H66』 СО50В` 
2000:X-238:Y22:0-&HBF:GOSUB 2000:Х-50:Ү-2 
:0-&H20:GOSUB 2000: RETURN ` 
3010 X=16:Y=5:ñ=&H8F:GOSUB 2000:RETUR 
3020 X=1 :Y=B: =&H66:GOSUB 2000:X-22:Y-78: 
=&H66』GOSUB 2000: X=40 : Y=B : ロニ =&HSE : GUSUB 


リス トク CRAZE-S1 IGCHR マシ ン 語 リス ト 


“С +D +E +F Sum 


し て 2000H 一 263FH を , プロ グラ ム ・ エ リ 
ア と し て 2640Hー2FFFH を 使っ て いま す . 
バター ン ・ デ ー タ は 3000H 一 に 置か れ ま す . 
両方 の マシ ン 語 の アド レス ・ マ ッ プ を 表 1, 
2 に 示し ます . 

この 科 は どう し て も ここ で つま びび < 


ППВ 


0:01:39 


/2000:X-245:Y-28:0-&H34:G60SUB 2000: X=50 : Y=8 
:Я=&НЗЕ : СОЅОВ 2000: RETURN d 
5050 X=28:Y=11:A=&H66:GOSUB 2000: RETURN 
3040 ° 

2050 GOSUB 2100:X-25:Y-17:0-&H3E:GOSUB 20 
00:X210:Y217:02&H34:GO0SUB 2000:X=15:Y=17 
:A=&H3E : GOSUB 2000:X=15:Y=15:ñ=&H8F : GOSU 
B 2000:X-215:Y-19:0-&H20:GOSUB 2000:RETUR 
N 


5060 GOSUB 2100:X25:Y-215:R0-&H8F :GOSUB 20 
00: X210: Yz15:Q- &HSC: GOSUB 2000:Хт10:Ү-17 
:0-&H34:GO0SUB 2000:X=10:Y=197:A=&H5C: GOSU 
B 2000:X215:Y215:0-&H20:GOSUB 2000:RETUR 


N ` 
5070 GOSUB 2100:X=5:Y=15:ñ=&H20:G0SUB 20 
00: Х=5:Ү=17:А=&Н52:6050В 2000:Х-10:Ү-17: 
А=&Н54 : GOSUB 2000: Х=15:Ү=17 :Я=&Н52 : BUSUB 
2000:X25:Y-219:0-&HB8F:GOSUB 2000: RETURN 
3080 ' 
5090 GOSUB 2200:X-235:Y-215:0-2&H85:G608SUB 2 
000:X225:Y217:0-&H3E:GOSUB 2000:Х=50:Ү=1 
7:0-&H34:GOSUB 2000: Х=35:Ү=17:Я=&НЗЕ : GOS 
UB 2000: Х=355:Ү=19:2=&Н20:6050В 2000: КЕТО 
RN 
3100 GOSUB 2200:X225:Y215:0-2&HB85:G0SUB 2 
000:X230: Y215: Q2 &HSC : GOSUB 2000:X235:Y-1 
5:0-&H20:GOSUB 2000: X= さ Oi Y=17 : ロニ &H さ 4 : GOS 
UB 2000:X230:Yz19:0-2&HSC:GOSUB 2000 : GOSU 
B 2150:X=35:Y=15:GOSUEB 2250 
3110 GOSUB 2150:X-235:Y-17:0-8H20:G0SUB 2 
000:GOSUB 2150:X235:Y-217:G08UB 2250:6050 
B 2150:X235:Y-219:0-2&H20:GO0SUB 2000:RETUR 
N 


2120 GOSUB 2200:X235:Y215:0-&H66:G0SUB 2 
000:X225:Y217:0-&H3E:GOSUB 2000:X-30:Y-1 
7 :Я=&Н54 : GOSUR 2000: Х=355:Ү=17 : = &НЗЕ : GOS 
UB 2000: Х=25: Ү=19: = &Н20 : GOSUB 2000: ВЕТО 
RN ; 

5150;.7 

5140 X-265:Y-17:0-2&H8F:GOSUB2000: X=70: Y=1 
7: А=&Н85 : GOSUB 2000: Х=75:Ү=17 :Я=&Н20: GOS 
UB 2000:GOSUB 2150: Х=65:Ү=17 : СО50В 2500: 
Х=64:Ү=17 : = &Н8Е : GOSUB 2000: X= ニ 69 』 Y=1 7 : = 
&H85:GOSUB 2000: Х=74:Ү=17 :Я=&Н20: 60508 2 
ооо 

2150 GOSUB 2150: Х=64:Ү=17 : БОБОВ 2500:Х=6 
3:Y=17:A=&H9ƏF : GOSUB 2000:Х=68:Ү=17:Я=&Н8 | ` 
5S:G0SUB 2000:X273:Y-17:02&H20:G08UB 2000 | 

:GOSUB 2150:X263:Y217:G60SUB 2300 

2100 Х=62:Ү=17 :Я=&НВҒ :GOSUB 2000 』 X= ニ 67 』 Y= 
17:A=&H85: GOSUB 2000:X272:Y217:02&H20:G0 
SUB 2000: GUSUB 2150:Х=62:Ү=17:6050В 2300 
: X=61 :Y=17』n=&HBF : GOSUB 2000 :X=66:Y=17:A 
=&H85: GOSUB 2000:X271:Y217:02&H20:GOSUB 

2000: RETURN 


PiO 


リス ト 2 グ CRAZE-SI IGCHR マシ ン 語 リス ト 
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FF FF 
00 00 
00 оо 
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BO 80 
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パン コン を 持っ て いな い 人 に ナイ コン と 言わ な いよ うに し まし ょ う . 僕 の ある 友達 は マシ ン 語 も わか る すご いや っ だ た 。 そん な 彼 に 
不 閥 が 起こ っ て (成績 の こと ), 彼 の 愛 機 PC-8001mkII が 親 に し まわ れ て し まっ た の で す . ふだん パン ソコ ン を 持っ て いな い 人 に ナイ コン 。 > | 
плах ЩАТИ, 逆 に ナイ コン と 言わ れる 立場 に きら き れ だ の で す . Р.51 ちな み に 彼 は BEEP 信 と 呼ば れ て いま к ЖАРЫШ ¿t WN 0, | 

3, た の ビー トル ズ ・ フ ァ ン で す . 曲 が 最 高 / Р.5.3 I am MZ-1500 USER% ` (Mr. 上 田 ) 


pio 


リリ スト ググ CRAZE-S1 IGCHR マシ ン 語 リス ト 


2роо 
2010 FF OO оо OO OO 40 OO 11 44 OO OO OO OO OO OO OO :94 
2020 44 OO OO OO OO FB FF FF FF 00 00 00 OO OO OO O4 :3D 
2D さ O A1 OO 00 OO OO OO 00 OO OO 00 OO OO OO OO OO OO :R1 
2D40 OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 
2050 OO 7F 7F 7F ЗЕ 1F OF ОЗ ЗЕ OO OO O1 OO OO OO OO :2D 
2D60 00 00 04 00 00 20 00 01 OO FF FF FF FF FF FF FF :1Е 
2D70 FF 48 O1 04 20 08 85 20 OR 10 01 40 OO 88 OO 18 :14 
2DBO 83 FF FF FF FF FF FF FF ҒҒ 49 B4 OA Bé 55 RF 42 :7E 
2D90 38 оо 08 49 A4 40 96 ВВ 52 FF FF ҒҒ ҒҒ FF FF FF iD 
2DAO F 80 :48 


o I ке» a a «ке өне «ке» «ее еее «же «мне и» «ке» e — À— «кен ——— — әмме өш».‏ ت aR о e aa amam aa _ Ñ... еее‏ مت بے سے ОО‏ سے سے ea‏ کی چیہ سے کے کے کے نے جس جت مت سے کے کے سے ہے سے کے کے سے کے ہے کے کے کے کے سے کے کے کے سے کے سے کے کے کے کے کت کے کے کے cub‏ کے سے 


Nie h кес, МЫЗ 


+6 +7 +8 
оо оо OO 


Ааа +0 +1 +2 
5000 D4 OO 04 


оо OO :EC 


Ұға, Зах 3 ы 4 i 9 S eG. а 4 4 A 


й ғыл š " Алу < に ご < dM. E 2 TU F 45 ^ n: ved Ne P^ ° 


š д AVA x 25 A C 52,47 . A SSS ыз E v У 4 š 1 d^ m Ed 2 T “Ха م‎ Jat го 
оа Гү. У-У ЫЫ C acie тоса у.а d C алға hh ҮТ, 5 Бс хы? Аа £c COE M. LE an deo ax Ба. па ора ауаз ка S 
Mr eM ЭО TA 125% ЖАҚ ENE ms SETTE = な モウ ы x LUE se EA Me s A еВ ЕД м2 4 Sae fede КР» dise ыл) Am DV に て すこ 
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ET : ai * j A . 5 8 LS $ ғ 
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ІЛ АК2 CRAZE-S1 IGCHR マシ ン 語 リス ト 


оо оо OO OO оо OO OO OO 


` r e ; 
ゆ 私 の 回 り に は , マイ コン を や っ て いる 人 は いま せん . こない だ 1 人 アル バイ ト し て 買う か も 知れ な いと 計っ て きた や つが いた の で . — E 
POR CERRO) 説明 し た の に , 最後 に 「 を れ で その パン コン は , 面 哲 い ゲ ー ム いっ ぱい 出 て る の 」 と 店 いよ り ま し た 。 は っ きり 言っ て 。 
が な り が っ くり し まし た . や は り 最 近 の 初心 者 は 。 パソ コン ニ ゲ ー ム と し か 思っ て いな いん で し ょ う ね ? (いま きら な に を 言っ て る ん だ ろ 」 
2) RS. を う 言 っ て る 本 人 も だ いし た 技術 も 三 え も 持っ と り ま せん が 少な く と も パソ コン ニ ゲ ー ム と は 思っ と り ま せん . 
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ДКЗ cRAzE-S1 マシ ン 語 リス ト 


(SGC №6 / / し いら か ん す ) AES SR A Я cru й | | 


š; と ғ У í " Ра -. М 4 с 5 К у f ۴ e. v^ T А y 4 
rt ТҮ 3 ЕЎ EX io + ` "> Mi 2 = EN PF + v, e - SE 
Mrd e pP EIE. < c> А Mt : e 4 y REDE enr PENIS diced Y ЖДО, АРА 2? a 7 
NIS ORA Yu ED ° 18787; a. T Жа i: NP U^ y ее, ee: > NS Sr Sha SEDE SDE Da uw Д 
+ irse x A fa ь, А Қ. = 4 , MÀ X T. «Жақа 521524 4 b л > - 9 Po ru Та Eon , 3 [4 - һ 4 
E EN. } E $ Ë Се の De まこ Ya SE F GS Инг, ¥ n Sr ` 3⁄4 "a 2 "odes Же > E PER iue TuS M PERS Қ eC PET у Rc 


ТАКЕ ONE ELA 5; 


жаа А 


Ро 


リリ スト 3 CRAZE-S1 マシ ン 語 リス ト 


一 体 。 何 枚 ボ ツン に すれ ば 気 が 済 むん じゃ ーー お っ と 失礼 , BHTRELT =. JW |. JF, PiOPiO の コー ナー に ハガキ を 出す と 、 較 る の 


— v 


b D CCdEOb*I)LT5bt. Tt 5F omo EG LOMA. 桜 満開 の 今日 この ご ろ で す が …」 ÉE L PEUn*S EU ここ 
D の 点 を 改良 で き な い ん で すか 同様 。 | PUT нан 


i218) f& ОМО СОСО ЗОТ. この ハガキ は 2 月 8 日 に 出し た ん で すか が ,。 も し 載る と し た 65)] CUL 4 Э. 


pio 


リス ト 3 CRAZE-S1 マシ ン 語 リス ト 
Add +O +1 +2 +3 +û +5 +6 +7 +8 +9 +A +B +C +D +E +F Sum йаа +O +1 +2 +3 +4 +5 +6 +7 +B +9 +A +B +C +D +E +F Sum 
5000 FF FE 06 ОЗ FE FE 06 05 06 FE O1 FE O4 ОЗ 04 OS :1Е 4200 ҒҒ FE 05 FE FE 07 FE FE FE FF FE FE FE O3 FE FF :F8 
3010 FE FE ОЗ FE 06 05 FE FF FF FE FE FE FE 02 04 FE :ҒҒ 4210 FF FE ОЗ FE FE 02 FE FE FE FE FE FE FE 05 FE FF 1F3 
5020 05 FE 04 ОЗ FE FE FE 05 FE FE OS FE FE FE FE FF :ҒҒ 4220 FF FE 05 FE FE 07 FE FE 04 O3 FE 04 ОЗ 04 FE FF :0E 
5050 FF 04 ОЗ 04 FE 07 FE FE ОЗ FE FE 05 FE FE FE 05 :OE 4250 FF FE O4 O3 O4 06 O3 06 FE 05 FE FE FE FE FE FF :ОҒ 
| 5040 04 05 04 04 03 04 FE FF FF FE FE FE FE FE FE FE :04 4240 FF FE FE FE 05 FE FE FE FE 04 ОЗ 04 04 03 06 FF :0D 
| 3050 05 FE FE FF 04 ОЗ 06 FE FE FE 05 FE FE 05 FE ҒҒ :0A 4250 FF FE FE FE ОЗ FE FE 04 O3 FE FE FE 05 FE FE FF :Ғ9 
5060 FF FE 04 05 04 04 05 O4 FE ОЗ 04 FF FE FE FE FE :OF 4260 FF FE FE FE 05 FE FE FE 05 FE FE FE ОЗ FE FE FF :F5 
5070 05 FE 05 FE FE ОЗ FE FF FF FE FE FE OS FE FE 05 :01 4270 FF 04 ОЗ O4 FE 06 05 06 FE 04 05 O4 05 FE FE FF :20 
5080 FE 07 FE FF FE FE 07 06 05 FE 05 FE FE 05 FE FF :ОҒ 4280 FF FE FE FE FE FE FE FE FE FE 01 FE FE FE 02 FF :Е9 
5090 FF FE FE FE 05 FE FE ОЗ FE FE FE FF FE FE ОЗ FE :F1 4290 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :FO 
3DAO FE FE O4 ОЗ 04 FE FE FF FF 06 03 04 07 FE FE 05 :16 4200 FF FF FF FF FF FF FF FF FF FF FF ҒҒ FF FF FF FF :ҒО 
SDBO FE FE FE FF FE FE 07 FE FE FE FE FE FE FE FE FF :ЕВ 42BO FF FF FF FF FF FE FE FE FE FE 01 02 07 FE FE FE :F5 ` 
ZDCO FF FE FE FE FE FF FF FF FF FF FF FF FF FF FF FF {ЕС 42CO FE FE FE FE FE FE FE FF FF FE 04 05 04 FE FE FE :F3 
SDDO FF FF FF 04 O3 06 FF FF FF FE FE 05 O4 FE FE FE :04 42DO 05 06 O4 05 O4 05 04 05 04 FE FE FF FF FE 05 FE :1F 
3DEO FE FE FE FF FE 05 02 FE FE FE FE FE FE FE FE FF :ED 42EO FE 06 ОЗ 06 FE FE FE FE FE ОЗ FE FE FE FE FE FF :ҒВ 
SDFO FF FE FE 07 FE 05 06 03 06 05 FE FF FE O3 FE FE :13 42FO FF FE 05 FE 05 FE FE FE 04 03 04 FE FE 05 FE FE :05 
Sum: O2 FS 10 13 09 1B 15 ОВ OO F5 04 Fé FD FE F2 02 :39 Sum: F2 F9 11 FB 09 10 F2 FE 01 05 FE FE 10 00 FS EC :F3 
Add +0 +1 +2 +5 +4 +5 +6 +7 +8 +9 +Ñ +B +C +D +E +F Sum йаа +0 +1 +2 45 +4 45 +6 +7 +8 49 +А +B +С +D ФЕ *F Sum 
| ЗЕОО ЕЕ ОЗ O4 FF FF FF FE FF FF FE FE FE FE ОЗ FE FE :Ғ5 4300 04 03 04 FF FF FE 05 FE O3 FE 04 O3 FE FE FE 07 :12 
SE10 FE ОЗ FE FF FE 05 FE 05 FE 07 FE FE FE OB FE FF :0B 4310 FE FE FE ОЗ 04 FE FE FF FF FE 09 FE 05 FE FE 05 :06 
SE20 FF O4 05 04 FE OS FE FE FE 05 FE FF FE FE FE 05 :06 4320 FE FE FE 03 FE FE FE 07 FE FE FE FF FF 04 O3 04 1:01 
ЗЕЗО FE FE 04 ОЗ 04 FE FE FF FF FE FE 07 FE FE FE FE :ҒС 4330 FE FE FE FE 04 O3 04 07 O4 O3 O4 04 ОЗ 04 FE FF :1D 
さ E40 05 04 FE FF FE FE FE 05 04 05 FE FE 07 FE FE FF :08 4340 FF FE FE FE FE 04 05 04 FE FE FE FE FE FE FE FE :Ғ2 
SESO FF FE FE 03 FE 04 05 04 07 FE FE FF 04 05 O6 FE :14 4350 FE 05 FE FF FF FE FE O4 05 FE FE FE 07 FE 04 ОЗ :08 
さ E6O FE 05 FE FE 05 06 FE FF FF FE FE 07 FE FE FE FE :FF 4360 04 FE FE FE FE O3 FE FF FF FE FE FE 05 FE FE FE :Ғ4 
3E70 05 FE FE FF FE FE FE 04 O3 O4 FE 07 FE FE FE FF :03 4370 O3 FE FE FE FE 05 06 02 06 05 FE FF FF 06 O3 O4 :1D 
さ EBO FF 06 ОЗ 06 04 05 04 FE 05 FE FE FF FE FE 05 FE :14 4380 FE 04 O3 04 07 FE FE FE FE ОЗ FE FE FE FE FE FF :00 
3Е90 FE FE FE ОЗ FE ОВ FE FF FF FE FE FE 07 FE FE FE :ҒА 4390 FF FE FE 04 05 FE FE 05 FE FE 04 05 04 05 FE FE :ОВ 
SERLO 05 FE FE FF FE FE ОЗ FE FE 05 04 07 FE FE FE FF :02 8380 04 05 04 FF FF FE FE FE 05 FE FE ОЗ FE 09 FE FE :0A 
ЗЕВО FF FE 07 FE ОЗ FE 07 FE FE FE FE FE FE FE 05 FE :FF 43BO FE FE FE FE 05 FE FE FF FF FE 06 05 06 05 FE 05 :0C 
| SECO FE 07 FE FE FE FE FE FF FF FE ОЗ 06 07 FE ОЗ FE :06 43CO 04 05 04 FE 06 ОЗ 06 FE 05 OC FE FF FF FE FE FE :1B 
SEDO 04 05 O4 FE 05 04 FE O4 05 04 FE FE 04 05 06 FF :21 43DO FE ОЗ FE FE FE FE FE 05 FE FE FE FE 05 FE FE FF :Ғ4 
SEEO FF FE FE FE FE FE 07 FE FE FE FE FE 07 FE FE FE :ҒЗ 43E0 FF FE 05 FE FE 05 FE FE FE 05 FE ОЗ FE FE 04 ОЗ 1:06 
さ EFO FE FE FE FF FE FE FE FF FF FF FF FF FF FF FF FF :ЕА 43FO 04 FE FE FF FF 06 ОЗ FE FE O4 05 O4 FE ОЗ FE 05 :12 
Sum: FE 13 05 ОЗ FC 12 02 06 O4 O7 EC 10 11 FD O4 EB :33 Sum: 06 01 FE ҒА OD OB 07 14 07 OC OA 08 14 12 Fé 17 :8A 
Add +O +1 +2 +3 +4 45 +6 +7 +B +9 +A +B +C +D +E +F Sum Әде: +0 *1 42 93 +4 «б еб 97 +8 99 +R +B +Ç *D +E +F 8ши 
SFOO FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :FO 4400 04 O3 FE FE 04 05 OB FF FF FE FE FE FE FE OC FE :12 
ZF10 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :FO 4410 FE 05 FE FE FE 05 FE FE FE 05 FE FF FF FF FF FF :FA 
ЗЕ20 FF FF FF FF FF FE FE FE FE FE FE FE FE 05 FE FE :ЕС 4420 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :ҒО 
5Ғ50 FE FE FE FE FE 05 FE FF FF 04 ОЗ O4 FE 07 02 FE :07 44520 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :ҒО 
ЗЕ40 06 O3 FE 06 05 06 05 FE 06 ОЗ FE FF FF FE FE FE :18 4440 FF FF FF FF FF OC 07 FE FE ОЗ FE FF FE 05 FE FE :ОВ 
ЗЕ50 FE O3 FE FE FE FE 07 FE FE FE ОЗ FE 05 FE FE FF :FB 4450 FE 05 FE FE OC FE FE FF FF FE 03 06 FE 05 FE FF :0A 
5Ғ60 FF FE 04 ОЗ 04 05 FE 05 04 FE O3 FE 05 FE 05 FE :17 4460 FE ОЗ FE 07 FE ОЗ FE FE 04 ОЗ FE FF FF FE FE ОВ :0A 
さ F70 05 FE FE FF FF FE FE FE FE FE 05 07 FE FE 07 FE :00 4470 FE 05 FE FF FE 05 FE ОЗ 06 05 FE FE FE 05 FE FF :ОВ 
ЗЕВО ОЗ FE FE FE 05 FE FE FF FF FE FE FE 05 FE ОЗ FE :FA 4480 FF FE O4 05 04 FE FE FF FE FE FE FE 05 FE 04 ОЗ :05 
ZF90 04 ОЗ FE FE 05 O4 05 06 04 05 04 FF FF FE FE FE :18 4490 O4 FE FE FF FF FE 07 FE FE FE FF FE 04 ОЗ 06 FE :05 
3FAO 05 FE 05 FE FE 05 04 O3 FE FE FE FE FE FE FE FF :ҒҒ 4480 O3 FE FE FE 05 FE FE FF FF FE ОЗ 06 FE FE 05 FE :02 
SFBO FF 06 05 06 05 FE 07 O4 05 04 FE 05 FE 05 04 05 :30 44EO FE FE O1 FE 05 FE FE FE ОЗ FE FE FF FF FE FE FE :ҒІ 
SFCO 04 05 FE FF FF FE FE FE FE FE ОЗ FE FE FE FE FE :Ғ4 44CO FE 06 ОЗ OB FE 04 ОЗ O4 FE 06 02 06 OS FE FE FF :28 
SFDO FE ОЗ FE FE FE ОЗ FE FF FF FE FE 04 03 04 07 FE :06 4400 FF FF 04 03 06 FE FE FE FE 05 FE FE FF FE FE FE :FD 
SFEO 07 06 O3 O4 FE 05 FE O1 FE 05 FE FF FF FE FE FE :ОҒ 44EO FE FE FE FF FF FE FE FE FE FE FE 07 FE O3 FE FE :FO 
| SFFO FE FE FE FE 05 FE FE FE 05 FE 04 05 O4 FE FE FF :ҒЕ &4ЕО FF FF FF FF FF FF FF FF FF 06 05 06 07 FE FE 05 :ОС 
Sum: 11 OE ҒА OO OA 11 06 00 05 FF 09 06 05 FF OR ЕЙ :45 Sum: F7 OC ЕВ 07 16 ОҒ 07 F2 F9 13 F7 OF ОЗ 00 06 FA :35 
Add +O +1 +2 +3 +4 +5 +6 +7 +B +9 +A +B +С +D +E +F Sum Add +O +1 +2 +3 +û +5 +6 +7 +8 «9 +A +B +С +D +E +F Sum 
4000 FF O4 O3 06 05 06 O3 06 07 FE FE FE O3 FE FE FE :1E 4500 FE 05 FE FE FE FE 05 FE FE ОЗ FE FF FF FE FE FE :F7 
4010 FE 05 FE FF FF FE FE FE ОЗ FE FE FE 05 06 05 06 :0A 4510 05 06 FE 07 FE FE 04 ОЗ O4 FE ОЗ FE 06 05 FE FF 11A 
4020 05 04 ОЗ O4 FE ОЗ FE FF FF FE FE FE 05 FE FE 06 :OE 4520 FF FE FE 05 FE FE FE 04 ОЗ O4 FE FE FE FE 05 FE :00 
4020 05 FE FE FE FE FE FE FE FE 05 FE FF FF 06 05 06 :03 4550 FE FE FE FF FF FE FE O3 FE FE FE FE FE FE FE 05 :ЕЕ 
4040 FE 05 FE FE FE 07 06 ОЗ 06 FE FE 06 ОЗ 06 FE FF :1B 4540 04 03 06 06 ОЗ 06 FE FF FF FE FE 05 04 ОЗ O4 FE :22 
4050 FF FE FE FE FE ОЗ FE FE FE ОЗ FE FE 05 O4 05 FE :FD 4550 FE FE FE ОЗ FE FE FE FE FE 07 FE FF FF O4 ОЗ FE :FB 
4060 FE 05 FE FF FF FE 04 ОЗ FE 07 06 ОЗ 06 07 FE FE :1B 4560 FE FE FE 04 ОЗ 04 FE 05 FE FE FE 05 FE ОЗ FE FF 1:05 
4070 ОЗ FE 05 FE 06 O3 FE FF FF FE FE 05 FE FE FE FE :02 4570 FF FE 05 06 03 O6 05 FE FE FE 05 04 FE FE 06 05 :1C 
4080 FE FE FE FE 05 FE FE FE OC FE FE FF FF FF FF FF :ҒА 4500 FE 07 РЕ ҒҒ FF FE FE FE FE FE 05 FE FF FE 07 РЕ IN 
4090 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :ҒО 4590 O4 ОЗ 04 FE FE FE 02 FF FF FE FF FE FE OB 07 FE :0Е 
| 4080 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :ҒО 4500 FF FE FE FE FE FE FE FE FE FE FE FF FF FF FF FF :ЕФ 
| 4ОВО FF FE FE FE FE FE FE FE FE 05 FE FE FE FE OC FF :Ғ7 45ВО FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :FO 
40CO FF FE ОЗ 04 05 O4 03 O4 06 ОЗ FE FE FE ОЗ 04 FF :1D 45С0 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 1FO 
4000 FF FE 07 FE ОЗ FE FE 07 FE FE 04 05 FE 07 FE FF :0р 45DO FF FF FF FF FF FE FE OC FE FE FE OS FE FF FE FE :FB 
| 4ОЕО FF FE FE FE 05 FE FE O3 FE 07 FE OS FE 05 FE FF :05 45EO FE FE FE FE 07 FE FE FF FF O4 05 O4 FE FE FE ОЗ :01 
40FO FF FE 04 ОЗ FE FE FE 07 FE ОЗ FE FE FE ОЗ FE FF {00 45FO FE FE FE FE ОЗ 04 OS FE ОЗ O6 FE FF FF FE FE OS :08 
Sum: ҒА O3 07 FD OD 08 FA 13 10 11 ҒО 04 OB 24 06 O1 :6Е Sum: F7 05 ЕВ 10 02 FE 01 OA FS 06 F7 07 FS 06 OF FD :ОҒ 
Add +O +1 +2 +3 +4 +5 +6 +7 +B «9 +A +B +С +D +E +F Sum Ааа +0 *1 +2 45 +4 45 +6 +7 48 49 +А +B +С +0 +Е +F Sum 
4100 FF FE FE 05 FE FE FE FE FE 07 04 ОЗ FE 07 FE FF 1:06 4600 04 05 FE 05 FE FF FE FE 07 FE 05 FE FE 02 FE FF :06 
4110 FF FE FE FE O4 O3 O4 O4 O3 06 FE 05 FE OS FE FF :14 4610 FF FE FE O3 FE OS FE FE FE FF 04 O3 O4 FE OS FE :06 
4120 FF 06 ОЗ 04 FE FE FE FE FE FE 05 FE FE ОЗ FE FF :01 4620 FE FE FE FF FF FE FE О5 FE 07 04 ОЗ 04 FF FE FE :04 
4120 FF FE FE FE FE FE 04 05 04 FE ОЗ FE FE OS FE FF :ҒЕ 4630 FE FE FE 06 ОЗ 06 FE FF FF FE ОВ FE FE 03 FE FE :06 
4140 FF FE FE FE FE FE 05 OC FE FE 05 04 05 04 FE FF :ОҒ 4640 FE FF. FF FE 05 04 FE FE FE 07 FE FF FF 04 05 04 1:09 
| 4150 FF FE 04 O3 04 06 ОЗ FE 04 O3 04 FE FE FE O1 FF :14 4650 FE 07 FE FE FE FF FE FE 07 FE 05 FE FE 05 06 ҒҒ :08 
410 FF FE FE FE FE 05 FE FE FE FE FE FE 04 ОЗ FE FF :F4 4660 FF FE FE FE 05 04 FE 05.04 FF FE 07 FE FE 05 FE :06 
4170 FF FE O3 O4 FE ОЗ FE 06 03 06 O4 ОЗ FE 05 O2 FF :1D 4670 FE FE FE FF FF FE FE FE 07 FE FE 07 FE FF FE 05 :FA 
4180 FF FE 07 FE FE 07 FE FE FE FE FE 05 FE FE FE FF :FB 4680 06 FE OS O4 ОЗ O4 FE FF FF FF FF FF FF FF FF FF 109 
4190 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :ҒО 4690 FE FF FE FE FE FE FE FE FE FE FE FF FF FE FE FE :ЕЗ 
4180 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :ҒО 4680 FE FE FE FE FE FE FE 07 FE FE 04 ОЗ 04 FE FF FF :ҒС 
&1ВО FF FE 08 FE FE FE FE FE FE FF FE FE FE FE FE FF :ED 46BO FF 09 FE 04 ОЗ 04 05 04 ОЗ 04 FE ОЗ FE 07 FE FE :23 
41CO FF 04 05 FE FE OC 04 ОЗ FE FF 04 O3 FE 05 OC ҒҒ :27 46CO FE FE FE ҒҒ FF 04 ОЗ FE FE FE ОЗ FE FE FE FE 05 :Ғ? 
4100 FF FE 05 Ой O3 O4 FE 05 FE FF FE 05 FE ОЗ FE FF :OE 4600 FE 03 FE FE FE 03 04 FF FF FE 05 FE OS FE 05 FE :07 
41Е0 FF FE FE FE FE FE FE OB FE FF FE FE FE OS FE FF :F7 46EO FE 05 Ой FE FE 07 04 05 O4 07 FE FF FF FE FE FE :10 
41FO FF FE 04 O3 04 FE 04 ОЗ 04 FF 04 O3 04 OS FE FF :1D 46FO ОЗ FE FE 07 FE 07 FE ОЗ O4 FE FE FE FE FE OC FF :11 
| Sum: FO FO 17 O5 F9 18 06 21 FE 05 12 11 F3 2А F7 FO :5F бит: Fé 05 EE OC FC 26 F8 ОВ 15 04 15 OR FD 00 10 F7 :55 
*Xab54A, 申し 訳 あ り ま せん が 編集 の 都合 ト か ら 間 に 合わ な いん で す よ . M»6. 2 箇月 後 の 自 分 この メッ セー ジ な ど を 送っ て , PiOPiO 
を タイ ムカ プ セ モル みた い に 使っ て みて は いか が で すか . P 


SE 


FE жаз E E МОРА 3 
RA VIC TE ess POM т РАО Ву 253 TY 
АА е а лақа HE TIRAS YES Yon y EAR 


t 5 * қ | 
æ š | 
, 


リス ト 3 CRAZE-S1 マシ ン 語 リス ト 


x 
Ол KA すい か つい ちご ーッ パナ ナー を ちゅ うり 一 ジュー スー アイ スー か き ご お り 一 きのこ 一 トマ トー カク テル (1) 一 りん ご ーー ビー ルー コー ラー マッ ク フ ラ 
і МА ポテ トー ショ ー ト ケー キー カク テル (2) マ ハン バー ガー の 20 種 類 で す . 何 度 や っ て も あき ませ ん . P.S.. BOMB BOMB の LOADER の 70 
56 IO ツウ 行か ら を 決 の よう に 変え て みて くだ さい (35 秒 ほど 待っ て ). 70 FOR 1=&Н2100ТО&Н41ВА 80 А-РЕЕК (D : IF A=3 


ме 


リス ト 3 CRAZE-S1 マシ ン 語 リス ト 


зара ыы д Qs Ésta qnis qusc Ta 
ТНЕМРОКЕІ, 0 90 NEXT : EXEC&H5000 そ うす る と 少し は 簡単 に な り ま す 。 PS2 これ か ら も ソノ シー ト を 続け て くだ きい / 
(ウォ ー ズ マン ) 


- 


po 。 | 


リス ト 3 CRAZE-S1 マシ ン 語 リス ト 


Add +O жі +2 +3 +4 +5 +6 +7 +8 +9 +A +B +С +D +E +F Sum 
SBOO FF FE FE FE FE FE FF FE FE FE FE FE FE FF FE FE :E3 
5В10 FE FE 05 06 05 FE FE FF FF FE FE FE 03 04 FF FE :02 
5В20 05 04 06 05 06 FF FE 06 O3 06 FE FE FE ОЗ 04 FF :22 
5В50 FF FE FE FE 07 FE FF FE 07 FE 05 FE FE FE 05 FE :02 
5В40 FE FE FE FE FE 07 FE FF FF FE OR FE FE FE FF FE :ҒВ 
5В50 FE FE ОЗ FE 07 FE ОЗ FE FE 06 O3 06 FE FE FE FF :09 
5B60 FF FE 07 04 05 04 FF FF FF FE 05 FE ОЗ 06 05 FE :19 
5B70 FE FE FE FE FE FE FE FF FF FE ОЗ FE FE FE 05 FE :ЕЕ 
5BBO FF FE FE FE FE FE FE FF FF FF FF 04 05 06 FF FF :ҒА 
5В90 FF FE 07 FE FE FE 05 FE FF FF FF FF FF FF FF FE sF6 
5BRO FE FE FE FE FE FE FE FF FF FE FE 04 03 04 05 FE :FA 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


mu) АК. Д CRAZE-SI コン スト ラク ショ ン BASIC R К 生徒 


10 ” жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ 
20 "ж 

* 
50 "ж 

* 
40 “ж 

ж 


CRAZE-S1 


с 


5О” жкжжжжж eoe noe oe oe poeseos oe ЖКЖ ЖЖК 


ЖЖ okk teo 


SAVE CRAZEC 
100 CLEAR, &HOO000:PRLETTE:WIDTHA4O:CLS 2:A 
=PEEK(&H2Z770) 』 IF A=&H33 THEN 150 
110 LOCATE 10,12:PRINT" ?уу2% э ロー ト ヾ シマ ズ 。 


120 LOADM" IGCHR":EXEC &H2OOB:FUR I-&H200 
О TO &H231F:POKE І, &HOO :NEXT :LOADM"CRAZ 
EMC":CLOSE:CLS 2 

125 ' 

130 FOR I-&HOO10 TO &HO148 


140 RERD B$ 

150 POKE І, VAL(C"&H"*B$) :NEXT I 

195 ' 

160 WIDTH8O:POKE &HFFDO,1:PRLETTE 0,1:РА 
(ЕТТЕ 3,10:PRLETTE 6,6:POKE &HDOOO, &HFF 

170 EXEC &HOO74: POKE &HDOOO, о: PRLETTE6。 1 
4:ЕХЕС  &HOO74: РОКЕ &HFFDO, О: PALETTE 

180 ° 


190 WIDTH8O:COLOR 7:EXEC &H2770:WIDTH4O: 


CLS 2:С=1 


ゆ ゅ お ひさ し ぶり で す が , まず は PiO 創 刊 1 周年 お めで と う ご ざ いま す . 実は 去年 の 10 月 ご ろ に 同じ よう な こと を 書い て 送っ て いた の で す が , 


1-3 は I/ ひ の 別冊 だ っ た ん で すね . 勘違い し て いま し た . 


|) く な っ て いた の で す . 秋葉 で タダ * ス トカ バー を 見 付け , バイ ト 代 で D 


ここ 半年 近く バイ ト な ど で 忙 し く , と て も SARAH ち ゃ ん ( 僕 の P6) を 相手 に せ ず , 
MIYUKIEASUKA( 僕 の ビデ ォ ) ば か り 相 手 に し て いた の で す . そう し だ た だら , SARAH ち ゃ ん は ふてくされ 市 販 ソ フト る え ロ ー ド し て くれ な 


ATA レ ュー ダダ の 新しい や つ を 与え て よう や く 機 嫌 を 取り 戻し て くれ だ の 


J 
E * 


2 


y 


nd 


$ 


E rs 


195 С=1 

200 COLOR C:LOCATE 1。1 さ 』INPUT WARIT220;5, 
"жжж GAME 7° 07“%54 3 ')7')#АЛ Y/N eek" D$ 
210 IF D$-"Y" THEN 230 

215 IF D$-"N" THEN 500 


220 IF C=8 THEN 195 ELSE C-2C*1:GOTO 200 
230 =PEEK(&H2025 ) : B=PEEK( H2026) :C=A*25 
6+BiIF C(&H3OO01 THEN 190 

245 


CLS 2:COLOR 7:LOCATE 7,12:PRINT "GAM 
Ea» マシ ンコ (GM) 9 ü-h"*zvza?":LORDM"GM" :CLOS 
E 

250 
ZEM 
255 
256 
258 
259 
260 


CLS 2:COLOR 6:LOCATE 5, 12:РКІМТ "CRA 
/ ファ イル メイ Тт” SAVE シマ スリ" 

LOCATE 12。14』INPUT "イイ すさ スカ Y/N ";A$ 
IF A$="Y" THEN 260 

IF A$="N" THEN 200 

GOTO 255 
SRQVEM"CRAZEM", &H2000, C, &H2748:CLOSE : 


CLS 2:COLOR 7:LOCATE 10,12:PRINT "SAVE 4 
nu" 

500 COLOR 7:END 

1000 DATA 7C,FE, 82, 82, 82, 82, 82, 82, C6, 44, 
7E,FE, 90, 90, 98, 98, 94, 94, F2, 62, ЗЕ, 7E 
1010 DATA 48, C8, 88, 88, CB, 48, 7E, ЗЕ, 86, 86, 
ва, BA, 92, 92, A2, 02, C2, C2, FE, FE, 92, 92 
1020 DATA 92,92,92,92,92,92,64,F6, 92, 92, 
92, 92, 92, 92, DE, 4C, 22, 62, 42, C2, FE, FE 
1050 рата 02,02,02,02,00, 00, ОО, 00, 00, 00, 
00, 7E, FF, FF, FF, C3, CS. C3, C3, CS, CS, CS 
1040 DATA C3, E7, 66, 24, 00, 00, 00, 00, 00, 00, 
00, 00, 33, 8C, 89, 1F, 30, 1F, BB, CC, BC, F1 

1050 DATA 10, 3F, 40, 09, 7D, DO, 00, 26, 13, CC, 
оз, оь, DD, 04, 8D, 2F, Cé, 20, 17, 00, А7, OF 
1060 DATA O4, OF, 05, вр, 24, 39, 86, 07, B7, FF, 
D8, 10, BE, 14, 88, 10, 9F, 00, 30, 8C, AD, Có 
1070 рата O3, 34, 04, 8р, 51, 35, 04, 10, 9E, 00, 


21,20, 10, 9F, 00, SA, 26, EF, 39, Dé, 04, F7 
1080 DATA FF, D8, 10, ВЕ, 10, F2, 10, 9F, 00, 30, 
BD, FF, 43, Có, 05, 34, 04, 8D, 2D, 35, 04, 10 
1090 рата 9E, 00, 31,25, 10, 9F, 00, SA, 26, EF, 
Dé, 05, F7, FF, D8, 10, BE, 14, B2, 10, 9F, OO 
1100 рата сё, 02, 34, 04, 8D, OE, 35, O4, 10, 9E, 
00, 31, 25, 10, 9F, 00, 5A, 26, EF, 39, 10, 9E 
1110 DATA 00, Cé, OA, D7, 02, 86, 80, А5, Ва, 27, 
08, 34, 02, 86, 87, A7, Аа, 35, 02, 44, 31, АВ 
1120 рата 50, 34, 10, BE, 00, ВО, 30, 1F, 26, FC, 
35, 10, 4D, 26, E2, 30, 01, 10, 9E, 00, 31, 21 

1130 DATA 10, 9F, 00, Có, 02, 8D, 05, ОЙ, 02, 26, 
CE, 39, 34, 36, BE, 10, 00, 30, 1F, 26, FC, SA 
1140 DATA 26,F6,35, 56, 39 


HIJAS CRAZE-S1 コン スト ラク ショ ン マシ ン 語 リス ト 


dd 

2640 
2650 
2660 
2670 
280 
2690 
2680 


20 
А5 
AS 
20 
AS 
AS 
AS 


4E 
55 
20 
31 
32 
32 
20 


45 
41 
20 
32 
зо 
38 
20 


2А 
43 
45 
20 
31 
32 
45 


4D 
48 
4E 
20 
36 
34 
4E 


45 
45 
44 
20 
2n 
2A 
44 


4E 
43 
AS 
20 
31 
32 
as 


55 
4B 
as 
20 
36 
34 
AS 


2A 
AS 
AS 
20 
AS 
as 
AS 


20 
32 
34 
20 
32 
34 
36 


57 
56 
20 
2А 
2А 
2n 
20 


AS 
45 
20 
31 
32 
32 
20 


+0 +i +2 +3 +4 +5 +6 +7 +8 +9 +A +B +С +D +E +F Sum 


:78 
:2B 
:9F 
: 6R 
: DF 
sF1 
:A1 


AS 
AS 
20 
32 
30 
38 
20 


AS 
AS 
20 
AS 
AS 
AS 
20 


AS 
AS 
20 
AS 
as 
AS 
20 


31 
33 
20 
31 
33 
55 
20 


CT. バイ ト も 終わ っ た し , イラ スト に も 復帰 し た いと 思い ます . 
た め 中 止 し まし た . も し 期待 し て いた 人 が いたら ゴメ ン な る さい. 


Oo さい Xa od tt ; E NODE n ro ard ИИ, Ы à 33 
27. 455 ТУ Ld bun ç 2 zu d (7 ET 70 Ұға” КАРЕ ISTE s LEM Š 


P.S. 制作 中 だ っ た P6 版 スー パー 麻雀 は , 麻雀 ソフ ト の 入手 に 成功 し た 


(CRUSHER) 


pi0 


リリ スト 4 CRAZE-S1 コン スト ラク ショ ン BASIC リ スト | 


n 
W 
5 
Т 
Më 
» 
M 
| 
^ 


OMZ-1500 


語 ) 


BASIC + (7 i < 


園山 本 


ザ ・ ボ ン バ ー 


腕 き き の ス パイ と し て 名 高い あな た の も 
C^, 新しい 任務 が 届い た. 

「 フ ェ ノ ラー ト 軍 の 秘密 基地 を 破壊 せ 
よ 」 

あな た は , 一 瞬 自 分 の 目 を 疑 つ た. フェ 
ノラ ー ト 軍 の 基地 は 番 兵 ロボ ッ ト の ス ダ ン 
I に よっ て , 厳重 に 守ら れ て いた か ら で あ 
5. し か し あな た は 勇 吉 に も , リモ ー ト コ 
ント ロー ル 可 能 な プラ ステ チック 爆弾 を 手 に , 
敵 の 基地 へ と 向かっ て いっ た . 
圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


| BASIC 


| 誘導 式 の バク ダン と いう の は 
イデ ア で すね . た だ 敵 が 倒し て も す 
ぐに 現われ て , な か な か 基地 に 近 づ 
け な い と き が ある よう で す が . (O) 


あと は 発火 装置 を 押す だ け 


画面 の 中 に 8 個 の 白い CTNT が あり ます . 
それ を 敵 の 基地 に 取り 付け て くだ さい ( 持 
шс Де GE ын» КОКТЫН > а эд) Му р 2 
ずつ し か 運 で ませ ん . そし て 全部 取り 付け 
る と 発火 装置 が 現われ る の で , それ を 押せ 
ば 基地 が 爆発 し て 1 面 ク リア に な り ま す . 

移動 は カー ツル ・ キ ー で す . [sPACE|x 
ー を 押す と , 自分 の 向い てい る 方 向 に 
BOMB が 発射 る きれ ます . BOMB は 飛ん で 
いる 間 カ ー ソ ル ・ キ ー で 操作 する こと が で 
sim, その 間 自 分 は 動け ませ ん . そし 
て 飛ん で いる と き に [SPACE| キ ー を 押す と, 
BOMB 入り プ ブロッ ク に な っ て を その 場 に 止 

まり ます . まだ た プ ブロック に 当 だ っ だ と きち も 
BOMBA 7 еу тот г 
BOMB 入り プ ブロッ ク は , も う 一 度 BOMB 
を 当て る と 破壊 する こと が で きま す . 

そし て , BOMB や BOMB 入り プ ブロッ ク 
に 敵 や 自分 が ぶつ か る と 死に ます . し か し 
蔽 は また 最初 の 位置 か ら 6 復 活 し て くる の で , 
数 が 減る こと は あり ませ ん . Nis, 最初 に 
自分 が 持っ て いる BOMB の 数 は 10 個 で す . 
全部 使っ て し まっ だら , MMA E i: 

マズ イノ バク ダン が な いよ ーー 


色 の 爆弾 製造 マシ ン (?) が ある の で , それ 
を 取れ ば まだ 10 個 に な り ま す . この マシ ン 
は , BOMB の 数 が 0 で な いと き は 取れ ま 
+A. 

人 の 数 は 最初 1 万 点 で , 次 か ら は 2 万 点 
ご と に 追加 さる れ ます . また 面 の 数 は 15 面 ま 
で ある の で , 頑張 っ て 全面 クリ ア し て くだ 
る い 、 

な お , 英 と 重なっ て も 死な な いこ と が あ 


り ま す が 。 これ は バグ で は あり ませ ん . 


先 の 面 が 見 だ か っ だら , 790 行 の 

RESTOR 2100 | 
の 所 を, 見 だ い 面 の デー タ ・ ア ドレ ス に 変 
えて くだ る さい. 

それ か ら , マシ ン 語 は BASIC の ボ イ 
ス ・ ボ ー ド 関係 の 所 に 入っ て いる の で , m 


イス 命令 は 使え ませ ん . 


高三 で 受験 生 ほ いう 自分 の 立場 も 省 み ず , 
去年 の 9 月 に MZ-1500 を 買っ て し まい , 7 
ログ ラム まで 作っ て し まい まし ただ. その 根 
性 を 買っ て (?) ど う ヵ 遊ん で みて くだ さい . 

今度 は マシ ン 語 を 使っ て シュ ー テ ィング 
ゲー ム を 作っ て み だ い と 思っ て いま す 。 
3 参考 文献 
“PROLOG シ ュ ミ レー ショ ン "。, 
ОН / MZ, 84 年 12 月 号 


| 


て 
ee 


も も も も も も 


t uui in 


| 


UU 


оН Ke. а 
ea 
cio Nos 


THE BOMBER BASIC リ スト — TU 


10 "AER ЭТ セッ ポテ EGRE 120 DATA 0000000E1F1F1FOE 00020400000206 88 88B020B408948080 :714 .27n9(**) 4 
20 CLSS: INIT"CRT:I":PRTY2:M-$9BOO: CONSOL 00 0000040000020600 5 BOMB(2) 220 DATA 0000001800000000 000000587E1A00 
Е 130 DATA 0000000000000000 7E020202004E7A 00 185С001800207С06 :715 MY HH 
30 FORIZMTOM*6:READA$:FOKEIsVAL(C"$"*A$): 50 7EFC8484FC7CCCFC :”6 マシ ン 250 DATA 0000001800000000 000000147E5800 
NEXT 140 DATA SF7FFFFFAAFFAAFF ООООООҒҒААҒҒАА ОО 185С001800045Е60 : "16 MY M2 
FF SF7FFFFFAAFFAAFF :°7 "Tv 1 240 DATA 0000181800000000 000018587E1400 
E 3 Я 150 DATA FFFFFFFFAFFFAFFF ООООООҒВАВҒВАВ ОО 185С181800607Е06 5 "17 MY iii 
60 FOüRI-1TOSS:READA$:FONT$(2,1)-HEXCHR$( ЕВ FEFCF8FBABFBABF8 : '8 т” 2 250 DATA 0000181800000000 000018147bE5800 
A$):NEXT 160 DATA AAFFFFEFEFFF7F7F AAFFCOFOFOCO7F ОО 185С181800067Е60 :718 MY l2 
70 DATA OO000000000000000 000000000000000 00 AAFFFFEOEOFF7F7F :79 t 5 260 DATA 0000101800000000 00001019FFB800 ' 
170 DATA AFFFFFBFBFFEFCCO A8F818787818D8 OO 183C10180001FF80 : "19 MY @1 
270 DATA 0000101800000000 000010D8BA3EO00 
00 183C101800007C46 :*20 MY E2 
280 DATA 0000081800000000 00000898FF1DOO 
ОО 183CO8180080FFO1 :'21 MY @1 
290 DATA 0000081800000000 0000081B5D7COO 
00 185С081800005Е62 :'22 MY E2 
ЗОО DATA 0000000000181800 00000000181878 
СЗ 00000081С5ВЕ1Е04 :*23 МҮ v7" 


о 0000000000000000 :70 оо 
80 DATA OOO1FFFFFFFFFEFC SF7FFFFFFFFFFEF 00 ASFS8F83838FBDSCO :^10 ж» 4 


С 0001030303030200 :71 2“п%? 180 DATA 0000000000000000 8C657BBF 7F 9F 3F 
90 DATA OO1CSESGESEO2SESE OO183C3CSCS3ESCS FF 0820696D6041806D6 :^11 »27n9(**) 1 
С ОО1СЗЕЗЕЗЕООЗЕЗЕ :72 TNT 190 DATA ОООООООООООООООО B2A&6FCDDFCFDFA 
100 DATA FE10100000000000 FE10107C007COO FF ВОА40С9ВА0Е480735 :^12 0Y2n)(t*) 2 
FE FE10107CO07COOFE :'3 ハリ ゅ リカ ソウ チ 200 DATA ОООООООООООООООО SFAF7F2FAB7D45 
-110 DATA 000070F8F8F87000 80400000103000 ОВ 2508250922480000 :^13 ハフ ハリ (キチ ) 3 
99 0040000010300000 :74 BOMB(1) 210 DATA ОООООООООООООООО FEF4F2FCDCB68A 


££ 
"(9 XO) 友だち に プロ グラ ム が 入っ て いる テー プ を 借 す と き は , ぜったい 別 の テー プ に コピ ー し て お こう . 僕 は MZ-700 ユ ー ザ ー だ が 。 MZ-1500 を 
QA Ол DIA E で きん な っ た で すむ か ~ー グ 弁償 せ 


OM Р.5.1 ZEPLIS は 面白 そ ー グ まだ 半分 し か で き と ら ん ググ PS2 タイ ム ト ン ネル は すご い キャ ラ ・ グ ラ の 使い 方 が うま い グ 


(MZ 狂 ) 


| 
ER 


| 440 MUSIC"OS"*4$*0$*B$; "02V9" *A$*A$*B$ 


310 DATA 2С5С5С587Е5А7СО6 3C002418000000 
ОО 5С0024587Е180000 : "24 EN H1 
320 DATA SC3C3C1A7ESCSEó60 3C002418000000 
00 5С0024187Е180000 : *25 ЕМ М2 
330 DATA SC3C3C587bE7A47EO06 5СООЗС1ІВОООООО 
00 5СО0О5С587Е1А0000 :726 EN kil 


540 DATA S3C3C3C1IA7ESE7E60 3COO3C18000000 
ОО 3COOSC1A7ESB80000 :727 EN Ш2 

350 DATA 783C3C19FFB9FF8O 78003C18000000 
ОО 78003C19FFBBOOOO :728 EN @1 

366 DATA 783C3CD8BASE7C46 78003C18000000 
00 78003CD8BA3EOO000 :^29 ЕМ E2 

370 DATA 1ESCSC98FF9DFFO1 1EO03C18000000 
00 1EO003C9BFF1DOOOO :^30 ЕМШІ 

380 DATA 1ESCSCIBSD7C3E62 1EO03C18000000 
ОО 1EO003C1BSD7COO00 :751 ЕМ B2 ` 

390 DATA 00000081DFAF7ECF O000000000A1A1A 
ОА 00000000160147ACB :752 EN 27" 

400 DATA 0000000000000000 499BFE7CFFFE7AÀ 
. A9 4001425408062422 :'33 ау ҮХЕРО 

410 DATA OOO1FFFFFFFFFEFC さ F7FFFBFO71 736 
ВС 0011230303133200 :"54 BOMB( 7 097) 
420 "на Л” ^L Әй 

430 A$-"T7SOMG6DAEC-A6-B4-G6": B$-"DA4EC-A6 
-B4-Aa-986-G8G6" 


450 FORI-ZOTO1:FORJ-OTO27:FPRINTLJsIX24 212 
s NEXTJ,I 

460 FORIZOTO1:FORJ-OTO24:FPRINTLIX27,;,J 12 
:МЕХТЈ, І 

470 CURSOR28, 1: PRINT[7。O Ј" Aw '' ; 
480 FORI-2TQ6: CURSOR28;I: РКІМТС7, 07" | 

| | "3: МЕХТ 

490 СОК50К28,7: РКІМТСЕ7, 01" | 
; 


500 CURSOR28,8:PRINTL[7,02" 77777 " 


, 

510 CURSORS31; 5: РКІМТС2, 01" SEPTEM! | HER 
ВЕК EZX2SLOMBER " ; 

520 FORI-1TOS:READY,C,A$: CURSOR29, Y: PRIN 
TLC,036$3;:NEXT 

530 DATA 10,4,HIGH-SCORE , 14, 4, YOUR-SCORE 
519,6, "BOMB :",21,6,"MAÓN  :",23,6, "ROUND 
g" 

540 РОКІ =0Т01: СОКЅОКЗО, 11+1 #4: РКІМТС5, 01 


"エーーーーー АЖААН | — — Gl I" ; : NEXT 
550 CURSORSé; 12: PRINT"ORSEBBBIOISEEZ1 02S 
іші " H 


560 "WE フィ トル ЫШ 

570 FORZ-OTO1:FORI- 1TO15*Z&3: READA, B,C,D 
580 FORJ-BTOB*D-1:FORK-ATOA*C-1: FPRINTLEK 
:J12-2:NEXTK, J41,Z | 

590 '----------------- 

600 DATA 6,2»5,1,8,2,1,5,11,2,1,5,11,4,4 
»1»14,25,1555,165,25,15,55,165,25,4,1,16,4,4,1 
610 DATA 1656,4,1,2,8,4,5,65,13,4,55,10,8, 
$5,59,15,13,4,5,18,8,4,5,22,13, 4,5 

620 DATA 3595151535115251, 9,85 152; 75 14,2 
»35.511,85,3,15,125,9,1.1 

630 DATA 11,10,1,5,12,11,1,2,15,10,1,5,1 
6514,1515165165,251518513,1,2 

640 DATA 19,9,5,1,19,11,3,1,25,14,2,1,23 
»16,1.2.,24.17,1,1,25,16,1,1 

650 :----------------- 

660 ЕОКІ =1Т08: КЕАРА, В: ҒРРКІМТГА, В 15: МЕХТ 
670 READA, В: ҒРКІМТГСА, В Ј8, 59ГА, B+1 Ј10, 11 
680 РОКІ =1Т05: КЕАРА, В: ҒРКІМТГСА, В JS: NEXT 


690 FORI=1T06: READA, В, С: ҒЕРКІМТГСА, В ЈС: МЕХ 
T 

VÀ S19 Millet e edente es ыы» жені скі ссе oe hi 

710 DATA 7,1,15,5,20,5,5,7;8,16,15,12,17 
;16,20,9,8,22,3,20, 23, 6517. 23 

720 DATA 25,12,4,7512,7,23, 23, 22 。 15。 25,2. 
8,20,17,25,4.25,29 

730 СЫРЫ Lat ty GRAM 

740 DIM EX( さ 3) EY(3) ,E1(3), Е2‹5), ЕК(5),ЕТ. 
(5),21(4).22(4) 

750 MT2.5:ZT2.5:FORIZi1TOS:ET(I)2.5: NEXT 
760 CURSOR8,20:PRINTL7.,11"HIT ANY КЕҮ!"; 
: GET A$:IFA$-""THENZ76O 

770 ‘RRR уат Uwr4 2 RRR 

780 SC=0: SB=10000: RO=1 : MA=5: PF =0: ВО=0: BN 
=10: ZN=0: ZZ=1: MUSICINI T: GOSUB" SCORE " 

790 RESTORE2100 

воо Жаби 77-7 ヨミ コミ & каз” ИЫ 
810 СОМЅО ЕО, 25,0, 28: PRINT"[S": FORI-1TO23 
:ҒОКЈ=1Т026: ҒЕРКІМТЕЈ,І J1: МЕХТЈ, I 

820 CURSOR11;12:PRINT"ROUND "; КО; : МАІТі5 
ОО: PRINT "[8" š CONSOLE 

830 ONERRORGOTO2430 

840 READT:IFT-OTHEN860: ELSEFORI =1 TOT : REA 
DA,B,C,D:FORJ-ZBTOB*D-1:FORK-ATOA*C-1 

850 ЕРКІМТІЕК, Ј 22: МЕХТК,Ј,І 

860 КЕАрТ:ІРТ-ОТНЕМ910: ELSEFORI =1ТОТ: REA 
DA,B,C,D,E,F 

870 FORJ-BTOB*F-1:FORK-ATOA*C-1:FPRINTEK 
sJ 12: МЕХТК,Ј 

880 FORJ-B«FTOB*D-1:FORK-ZATOA*E-1:FFRINT 
CK, J 12: NEXTK, J 

890 FORJ-B*FTOB*D-1:FORK-A*C-ETOA*C-1:FFP 
RINTELK,J 12: NEXTK, J 

900 FORJ-B*D-FTOB-*D- 1: ҒОКК=АТОА+С- 1: FPRI 
NTLK,J12: NEXTK, J, I 

.910 READT: IFT-OTHEN930: ELSEFORI =1ТОТ: REA 
DA,B,C,D:FORJ-BTOB*D-1:FORK-ATOA*C-1 

920 FPRINTELKs,JJO: МЕХТК,Ј, І 

930 FORI-1TO8:READA; В: ҒРКІМТСА, В 25: МЕХТ: 
FORIZ1TOA4:READZ1(I),Z2(I):NEXT 


940 READFX,FY:FPRINTLFX,FY 18, 9CFX,FY+1 11 
0,11 

1950 READSX,SY, MX, MY:FORIS1TOS:READEX(I),; 
EY(1 ) NEXT 

960 "WEGE メイ ン ル - フ ° 

970 ЕРКІМТІМХ,МҮ122:М1-МХ:М2-МҮ:МК-22.5: 
FORI-1TOZ:FPRINTLEX(I),EY(I) 125 

980 E1 (1 )=EX(1 ) 3 E2CI)-EYCI) : CURSOREX (1), 
ЕҮ(ІЗ:РКІМТІЗ2"П" 5 : NEXT: GOSUB"SCORE " 

990 FPRINTLZ1(ZZ2),22(Z22) 17: IFBO-BTHENFPR 
INTESX, SY 34 

1000 WAITSOO:MUSIC"T7OSE1RERERGSR1E36702 
"5" TZV1003C1RCRCRESR1C3E702" : MUSICMAIT 
1010 GETA$:IFA$«»""THEN1030: ELSEFPRINT CM 
X,MYJi1:WAIT200 

1020 ҒРКІМТЕМХ, МҮ 222: WAI T200: GOTO1010 
1030 GOSUB1070: 1-1: 505081820: GOSUB1 070: I 
22:608UB1820:G0SUB1070:I-23:GOSUB1820:1-1 
:GOSUB1820 | 

1040 GOüSUB1070:1-22:GÜ0SUB1820: GOSUB1070: I 
=3: GOSUB1 820: GOSUB1 070: 121: GOSUB1820: 1-2 
:GOSUB1820 

1050 GOSUB1070:1-22:GO0SUB1820:G0SUB1070:I 
21:GO0SUB1820:GOSUB1070:I1-22:G0SUB1820:1-3 
:GO0SUB1820:G0TO1020 


1060 "ШШШ v"2"7 フー イト トウ -- 


1070 USR(MD):C-PEEK((M*7): IFZN-1THENONI1-(C 
-32)60T01140,1220 

1080 ІҒС<>52ТНЕМ1550 

1090 '[IXIXXI) BOMB ЦІЮ 

1100 IFBN-OTHEN1790: ELSEBN-BN- 1: GOSUB"SC 
ОКЕ" 

1110 NOISE"TSO06SOM2BS":"TSO03SOM2CS" : IFBN 
-OTHENMUSICSTOP:MUSIC"T7O2CODCDCD" 

1120 72-М2-(МК-16.5)%(МК-18.5):21-М1-(МЕ 


=20.5)+(МК=22.5) 


1130 CD=— (MK? 16) - MK? 18) -(MK» 20) = (MK? 22) 
+16: 23=1:01=21:02=22: 650701160 

1140 ІР (С<17) ОКС 20) THEN1 150: ELSECD-C 
1150 MM2=Z2-(CD=17)+(CD=18 ):M1=Z1-(CD=19 ) 
*(CD-20) 

1160 IF(W2«100RC(V2» 23) OR(CU41« 12ORCW17 260 T 
HEN1240 

1170 ZP=FEEK( ま $D400+M1+M2*40) : ONZF* 1850TO1 
190,1220 

1180 ON-(ZP>1)-(ZP>11)-(ZP>23)-(ZP>33)G0 
TO1240,1330,1270,1200 

1190 ZTz-ZT:FPRINTLZ1,2211:Z21-2U1: Z2-W2:F 
PRINTLZ1,2215.5*ZT:G0T01790 

1200 FPRINTLZ1,2211:21-W1: Z2-W2: GOSUB"SO 
UND":FORJ-OTO1SSTEP1.5:FFRINTLZ1,221354 
1210 МАІТ20: ҒРКІМТС21, 2211: МЕХТ: ZN-0: GOT 
01790 

1220 FFRINTLZ1,2211:Z21-2W1: Z2-W2 

1230 FPRINTEZ1,22135: MUSICSTOP: MUSIC"T7O 
2COD":WAIT20: ZN=0: Z1-M1: 22=М2: 650701790 
1240 IF(Z1= W1 AND CZ ZZ THEHEWUOI 2391 Z 
2-М2:650701790 

1250 GOSUB"SOUND":FORJ-OTO1SSTEF1.S:FPRI 
М№МТС21,22 ]54: МАІТ20 

1260 FPRINTLZ1,2231:NEXT: 2№0: 50701790 
1270 FORPz1TOS:IF((W1-E1((P))ANDC42-7E2(P)) 
THENFD=F' 

1280 NEXT: GOSUB"SOUND": FORJ-OTO1SSTEF1.5 
sFPRINTEE1(PD ) 。E2(PD ) 234LZ21, Z211 

1290 МАІТ20: ҒРКІМТГСЕ1 (Рр), Е2‹РРр) Ј1: МЕХТ: 
FPRINTLE1(PD),E2(PD) 133 

1300 SC=SC+50: SB-SB-50:GOSUB" SCORE" 

1310 FPRINTLE1(PD ) 。E2(PD ) J1: E1(PD) -EXCPD 
)*tE2(FD) EYCPD) : FFRINTELE1(CPDO,E2(CPD) 125 
1320 ZN-0:G0T01790 

1330 ЕРКІМТІ21,2211:050701660 

1340 "OINI n»?"» 

1350 IF(C«17)0R(C2 20) THEN1790 

1360 Ср-С:МТ--МТ:ОМС-17650701580,1590,140 
о 

1370 р2=М2- (М2425):р1=М1:МК=16. 5: 
о , 
1380 D2-M2-*(M2»1)0:D1-M1:MK-18.5:G0T01410 
1390 02=М2:р1=М1- (М1<26) : МК=20. 5: 6070141 
о 

1400 р2=М2:р1=М1+(М1>1):МК=22. 

1410 EE-PEEK($D400-*D1-*D2X40): ONEEGOTO179 
0,1500,1570,1650,1650,1460,1530,1520, 153 
0,1530 

1420 IFEE= さ 4THEN165O 

1430 '[IXIII) 4,77 LIIIID 

1440 FFRINTLM1,M211:M1-D1:M2-D2:FFRINTLM 
1, М2 ЈМЕ+МТ: Б0Т01790 

1450 '[IIXII) マシ ッ 7 トル OCCO 

1460 ІҒВМ>ОТНЕМ1790:Е( БЕЕРКІМТІМІ.М211:М 
1-D1:M2-D2 

1470 ЕРКІМТЕМІ, М2 ЈМЕ+МТ: MUSIC"T7GOFEDC": 
BN-10:GOSUB" SCORE" 

1480 22=1-22#%(22< Ao 
17:50701790 

1490 “"ПІТІКІ 1° 77°77 ラトル CXIXIIJ 

1500 ІЕРЕ-1ТНЕМ1790:Е(СБЕЕРКІМТІМІ,М221:М 
1-D1:M2-D2 

1510 FPRINTEM15M2JMK«MT: MUSIC"T7CODEFG" : 
PF-1:GO0TO1790 

1520 ы > + =? + & Ir 7 47 ПО 

1550 IFPF=OTHEN1790』ELSEMUSIC"T6CO+ じ ビビ + じ C 
+С": РЕ=0: BO-BO-*1 

1540 SC-SC*300: SB-S5B-300: GOSUB"SCORE" 
1550 IFBO«X8THEN1790: ELSEBEEP: FPRINTLSX, 5 
Y 14: G0TO1790 

1560 '[IXXII)] ^» 2 リア - OND 

1570 NOISE"T4O06SOM1OB6"; "T406SOM10G6" 


GOTO141 


piO 
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1580 FORJ-OTO15SSTEF.795:FFRINTLFX4FY 312.1 
う 3[FX』FY+1 114, 15: WAIT2O 

.1590 FPRINTLFX4FYJO,OLFXsFY-*13JO$, O: МЕХ г 
1600 SC-SC*1000:SB-SB-1000:GOSUB'" SCORE" 
1610 WAIT200: MUSIC"T602*C1CDEFGAB-*C3GC4" 
$"To6O1*CiCDEFGAB-*C3GCA" 

1620 ҒОКІ-іТ0О2:ҒЕРКІМТГЕ1(І),Е2(1)155:МЕХ 
T: MUSI CWAIT 

1630 кеиин En RI ТИИ 
о 

1640 '[XIIIXI) v?" 

1650 FFRINTLZ1s42221J1LM14,M22J1:M1-D1:M2-D2 
1660 GOSUB"SOUND":FORJ-OTO1SSTEF1.S:FFRI 
NTLM1,M22J34:WAIT20:FFRINTLM1;,M22JQ: NEXT 
1670 FFRINTLZ1,223J1LM1,M23224 

1680 MAàzMà-1:GO0SUB "SCORE":MUSIC"T7FSC2R 
OCSsCSC7ESF ": MUSICWAIT 4 

1690 ОММА%1650701710 

1700 FFRINTLM1,M211:FORI-1TOS:FPRINTLEI( 
І).Е2(1)11:МЕХТ:2М-0:60Т70970 

1710 WAIT3OO:FÜRI-OTOB:FFRINTL1O*I463JO:N 
ЕХТ 

1720 6050ВвВ"500Мр":ҒОБ.7-0ОТ0155ТЕРІ.5:СИК5 
ОК10,6:РКІМТ SPC(9); 

1750 СМИК5ОК10,6:РКІМТІ?7,11"БАМЕ ОУЕК"%:М 
ЕХТ 

1740 ҒОКІ-07014: ЕРКІМТС7+1, 18 Ј0: NEXT 
1750 GOSUB"SOUND":FORJ-OTO1SSTEF1.S5: CURS 
OR7418:PRINTSFC(192); 

1760 CURSOR7;18:PRINTL7$412J"TRY AGAIN?(Y/ 
NO)": NEXT: IFSC2HSTHENHS-SC 

1770 MUSIC"T7O0SRSCADEFGECDEFGEF 一 ロー єє -BCDC 
В"; "Т702У15К8СБЕБСЕБҒЕрСВ" 

1780 GETA$: IFA$-"Y"THEN780: ELSEIFA$«»"N" 
THEN1780: ELSECLS3: END 

1790 RETURN 

1800 "ШШШ FF / イト "ワウ EXER 

1810 "ONAIN 1-2" J LCXXIXIX] 

1820 IFINT(RND(1)0X2)-1THENC-1—(E2(I)2M2) 
s ELSEC=3-(E1(1 ):M1 ) 

1830 ЕТ(І)--ЕТ(І):ОМС-1050701850,1860,187 
9 

1840 D1=E1CI):D2=E2(I)—-(E2(I)<23): EK(I)= 
25.S+ET(I):GOT01880 

1850 Di=E1(I):D2=E2(I)+(E2(I)>1): EK( 1 ) =2 
7.5«*ETCI):GOTO1880 

1860 р2=Е2(1):рі=Е1 (1) -(Е1(1)<26):ЕК(І) = 
29.5+ЕТ (І) : 50701880 

1870 р2=Е2(1):рі=Е1 (1) +(Е1(1)71):ЕК(І) =5 
1. S*ET(I) 

1880 EE=PEEK( ま D4OO+TD1+D2*40 ) : ON-CEE-34) + 
(EE>O)*(EE< 14) X2GOTO19 30, 1980 

1890 '[XIIII) t°? DOO 

1900 IF (D1=M1 AND (D2=M2) THEN1670 

1910 FPRINTCE1(I),sE2(1)131:E1(1)=D1:E2(1) 
=D2šsFPRINTLE1(I)sE2(I)JEK(I): 50701980 
1920 '[XIXIXI) уу?” (ШҮП 

1930 FPRINTLEE1(I),E2(I)J1:E1(I)=D1:E2(I) 
=D2 

1940 GOSUB"SOUND":FORJ-OTO1SSTEF1.35: FPRI. 
МТГЕ1(1),Е2(Х(1)134 

1950 МАІТ20:ЕРКІМТІЕ1(І), „кы МЕХТ:ЕР 
КІМТГЕ1(1),Е2(1)1355 

1960 5С-5С%50:5В-5Б-50: GOSUB "SCORE " 

1970 ЕРБІМТГЕ1(І).Е2(1)11:Е1(1)-ЕХ(1):Е2 
(I)SEYCGIO:FPRINTCE1(CIO;,E2(1I) 125 

1980 RETURN 

1990  — 7L -F 5 

2000 LABEL"SCORE" : "CIXIIIIIII) 

2010 СОКБЅОК51, 16: РКІ МТОЅІ МБ "######" 5С; : 
CURSUR さ 1 。 12: РКІ МТОЅІ МС" ######" HS; 

2020 CURSUR さ 5 25: РКІ МТОЅІ NG "## 6 ы 
2030 CURSUR さ 5。 2 1 :』PRINTUSING ###" 3 МА; : CUR 
SORIS, 19: PRINTUSI NG "###" ; BN; 

2040 IFSB»OTHENRETURN: ELSEMA-MA-* 1: SB= 200 
00: MUSIC" T7COEGCEGCEG " : GOTO2020 

2050 LABEL"SOUND" : "CIIIIIIIII) 

2060 MUSICSTOP: NOI SE" TAOSSOM6B4" ; "T40350 
M3C4": RETURN 

2070 RESTORE2100: RESUME840: 'CEXIXIJ 

2080 سسا‎ DATA (n»'22) EGRE 

COTO Cede, КИ ааьан 

2100 DATA 0,3,3,3,225,19,2, 2,7, 6514,12, 2, 
2511,9,65,651;,1 

2110 DATA 16,8,3,1,25,19, 3,1,2, 5,852, 1, 35, 
16,2,1,; 23,8,2,1, 23,16,2, 1,8, 20, 1,2 

2120 DATA 19,20,1,25,135,65154516565152»7; 
10,2,;1,7513,2,1519,10,25 1519, 13,2, 1 

2150 БАТА 15,16,2,2,14,14.1.1 

2140 БАТА 1,9,9,1,20,1,9,10,11,25,14,19, 
17,10,26,15,6,6,6»19,14,2,17,14 

2150 DATA 15,11.22,19,25,22,1,1,1,25,26, 
1 
2170 DATA 172; 2510, 2,2,2, 2565 5, 5, 99 25 25 
9,5,25259525 55165251052, 24,23 25 6 

2180 БАТА 18,5,5,2,21,9,5,2,24,9,2, 5.5134 
4,2,2,11,6,6.5;9,9,10,2,7,12,14,5 

2190 DATA 5,15,18,2,3,18,22, 35, 2, 21,24,2, 
о, о 

2200 рата 4,1,25,1,17,8,8,11,21,14, 4,17, 
25,235,5,25 

2210 DATA 22,14,6,8,2, 20, 25,1, 
25,9, 8.2.9, 16,2, 25,15 

0 rci e NÜ,S wee 

2230 DATA 152,25» 24,215,058; 2, Os 24, S 2» 10, 
24, is2,14,24, і, 2,18,24, 1 

2240 DATA ё, 2,1,21,11,2,1,21,16,2,1;, 2554 
1,2,1,21 


13,2514, 


59440 
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250 DATA 1,1,1,10,1,25,11,1,16,1,26,1,1 
eere vigo 
2260 DATA 7,15,20,1,7,23,20,23, 
»25,24,18,6,6,6,.18,21,6 
2270 NO.4 
2280 DATA 1,8,6,12,12,0,4,9,7,4,4,14,7,5 
»4.9,15,5,4.15,15,4,4 
2290 БАТА 10,9,10,15,11,8,12,14,15,9,16, 
15,17,8,17.14 
2500 DATA 25,15,4,15,14,21,1,1, 
:18,23,20,4,53,4,20,23, 3 
2310 NO. S 
2520 DATA 10,1,4,6,1,8,4,12, 
»8,24,1,1.12,26,1,2,16,12,1 
2550 DATA 15,16,11,1,1,20,6,1,8,20,12,1, 
21,20,6:1,0,0 
2540 БАТА 5,25,10.19,17,19,24,23,2,5,10, 
аласа 3 

350 DATA 3575235 15。 2 さ 。 7 。 さ 』 15。 
11,25, 19,14,8,6, 12,21,12 
2360 ° NO. ó 
2570 DATA 0,0,0,5,9,5,14,11,4,11,19,16.4 
» 16,1%9,22,9,22,14 
2580 DATA 20,17.8,12,16,12,22,4, 
5,4,16,14,11,9,11,14,16,9 
23590 " NO. 7 
2400 DATA 1,1,1,26,25,0,25,2,2,1,21,7,2, 
1321,12,2;1,21,17,2,1,21,21;2,1,21 
2410 DATA 25,2,1,21, 5,4,4,1,52,10,4,1,5 
16,4,1,5,18,4,1,8,6,4,1,8,15,4,1 4 
2420 DATA 8, 17,4, 1,15, 4,4,1,15,9,4,1,15, 
15,4,1,15,19,4,1,18,6,5,1,18,12,5,1 
2430 БАТА 18, 17,5,1,22,4,5,1,22,14,5,1,2 
2,19,5,1 
2440 DATA 25225752575 22,12,22,17, 22, 21,2 
‚21, 22,25,22 
2450 DATA 1259,17; уз 7, 10,12,15, 
33% 2,25,21,2,1, 17,1,25,1 


15,19,26 


15,11,8 


121.4,6,1,2 


15,2,14, 


15,11, 


12,1,2 


" M L| 
N P 


„ y 


Фіһе ASSA 
PV-2OOO で , マシ ン 語 を 使っ た ゲー ム 
を 作ろ うと し て いる 人 の た め に , ROMIL 
ン を 調べ て み ま し た . 


スプ ブラ イト 編 


@050BH 一 

IN :A… ス プラ イト 番号 (00Н-1ЕН) 
Lg | 

DUST. 

BREAK:AF 

Areg が 示す スプ ライ ト の 色 を Lreg の 色 

ЕТ, 

e€0518H — 

IN :A… ス プラ イト 番号 
H- XF p 
L…Y 座 標 

OUT : 

BREAK : AF 
Areg の 示す スプ ライ ト を 表示 し ます . 
Lreg に D1H を 入れ る と Areg が 示す スプ ラ 

イト 以降 の 全 ス プラ イト が 消え ます . 


キー 入力 編 
e010FH — 
IN : 
OUT: A… 図 の よう 
BREAK : AF | 
Areg に ATTACK キ ー の 状態 が 入り ま 


(00H —1FH) 


な 値 が 入り ます . 


見 て いる と 。 
ん の 言う と お り , 1 ター 


ぁ 今 日 は PiO の 発売 日 だ っ た か な ぁ ? 
いき な り 「 ポ テト チッ プス の こなさ る ん な に を 言 


2470 БАТА 6,1,6,26,1.1.12.26,1.1,18,26 
7з1;1,25,14,1,1,25,21,1,1,25,0.9 

2480 DATA 7529515 3514,5,1, 3,21, 5, 1, 3, 7, 11 
91»5»14,11,1,5,21,11,1.5,7,17,1,5 

2490 DATA 14,17,1,5,21,17.1.2, 2,5,2,2 
5з4;17;12,25,16,1,25,5,25,25,26,11 

2500 БАТА 14,15,14,11,7,5,7,.19, 25,16,2 
»25,19,17,7,6,718,21,6 

2510 " NO.9 

2520 DATA 6ё,2,2,5,9,2,11,6,12,9,11,5,12, 
15,11,5,12,21,2,1,9,21,11,5,12 

2550 DATA 0,6.5,25,5,8,5,12,4.10,10,12,2, 
10,16;12,1,11,18.12,1,11,22,12,2,10 

2540 DATA 5,21.6,12,10,21,12,12,16,21,18 
з12,22,21.24,12 

2550 DATA 16,10.17»10,18.10,19,10, 2,9, 
21»1,10,10,7,21,15,21,25,21 

2960 `” NO. 10 

2570 DATA 135,8,8.12.9,2,4.1.17,4,6,1,12, 
6»,8,1,.9,4,2,20.1.6,4.16,1.8.6.12,1 

2580 DATA 25,4,1.17,25,6,1,15.21,8,1,9,4 
»22,20,1,6;20,16.1;8,18,12,1.0,0 

2590 DATA 1.15,5.10,11.1,14,5,12,21,16,2 
JS, 24,14,26,11 

2600 DATA 13,17,14.17.15.17.14.17, 15,1 
$,23,21,23,20,4,4,4,20,23,4 

2610 

2620 DATA 151515 26,23,0,2151351, 2, 35 12, 4 
4,2»11,6.6,2,10,8, 8,2,2. 10,24.2 

2650 DATA 4,12, 20, 1;6;13,16, 1, 8, 14, 12,1, 
9,15,10,1,8,16,12,1,7,17,14,1 

2640 DATA 6,18,7,1.5,19,7,1,4,20,6,1,2,2 
1,5,1,2,22,4, 1 

2650 DATA 15, 18,7,1,16,19,7,1,18,20,6,1, 
20,21,5,1,22,22,4,1 

2660 DATA 4, 22,6,11,8,19, 
19,19,21,11 

2670 DATA 10,15,14.9,17,15,12.16, 
»15;17,14,17,1,10,26,10,25,22 


12,7.14,5,16,9, 


Є 
ИИСИ 


PV-2000 ROMBEBI = 


ATTACK | ATTACK | ATTACK |AT TACK 


ОСТ: A STICK (1) の 状態 が 入り ます . 
BREAK : AF 
BASICO STICK (1) 
i. 
e01DCH — 
ІМ: 
ОСТ: A--STICK (0) の 状態 が 入り ます . 
BREAK : AF 
BASIC の STICK(0⑩0) と 同じ 役目 を し ます . 
ブロ ッ ク 転 送 編 
e 05B7H ~ 
IN : HL…V-RAM 側 の アド レス 
DE… メ イン RAM 側 の アド レス 
BC… デ ー タ の 長き 
OUT : 
BREAK : AF 
V-RAM か ら メ イン RAM へ ブロ ッ ク 転 
送 し ます . 
e05F7H — 
ІЧ: HL…V-RAM 側 の アド レス 
DE… メ イン RAM 側 の アド レス 
BC… デ ー タ の 長き 
ОСТ: 
ВКЕАК: АЕ 
メイ ン RAM か ら V-RAM へ ブロ ッ ク 転 


と 同じ 役目 を し 


〇 電気 で 展示 し て ある の を 10 分 で ら いい じ っ た だ け な ん で す . で すか ら 。 1 面 ペ イン 


2690 DATA 9,12.10,4,4,2,2.4,4,7,6,4,4,22 
»2»4.,4.17,6,4,4,22,18.4,4,17.14.4,4 

2700 DATA 2,18,4.4,7.14,4,4,0,.0, 4,4,9, 
854,19,9,15,18,8,18,15, 23, 4, 22, 19 
2710 DATA 15,6,20,11,14,17,7.12, 
24,20,25,25,1,1,1,25,26,1 

2720 >? М0.15 

2750 DATA 0,5,8,9,12,7.1.1.2.2,9,8,1,1,1 
7» 2:,9;8,1,1,17,15,9,8,1,1.2,15,9,8,1,1 
2740 DATA 2,9,8,1,9,18,8,1,9, 5,8,5,16, 
5,21,9,5,18, 21,24,35, 24,8, 25,15 

2750 DATA 12, 10,15,10, 14,10,15,10, 15,1 
5;4,14,25,21,5,5,9,21,.18,5 

2760 " NO. 1 4 

2770 DATA 0,5,3,5,22,19,1,1,5,5,18,15,1, 
1,7,7,14,11,1,1,9,9,10,7,1,1 

2780 DATA 11,11,6,3,1,1,15,5,14,1,2,8,5, 
2315245125152, 759,15,15 7,15, 1 。 1 

2790 DATA 9,12,1,1,10,7,1,1,10,17,1,1,15 
›‚15,1,1,14,9,1,1,17,7,1,1,17,17,1,1 

2800 DATA 18,12,1,1,20,9,1,1,20,15,1 
2810 DATA 6,10,6,.14,11,6,16,6,11,18,16,1 
8.21,10,21,14, 15,14,14,14,12,14,14,14 
2820 DATA 15,12,.15,12,21,18,6.6,6,18,21, 
[=] 


15,11, 


М0.15 ------ 
2840 DATA 1,1,1.26,22,0,10,7.2,2.1.6,5.,4 
з1з5,4,5,2,7;,0.2.14,5,20,7.2 
2850 DATA 11,2,14,53,11,5,25,5,11,10.14,2, 
22:15,53,7,15,20,12,2 
2860 DATA 6,22.,9,11,14,12,16,4,6,5,20,4, 
21,12,24,22 
2870 DATA 7,22, 19,22,88, 12,23,12, 
»22,25,4,10,2.10.12,12,21 


5.4.25 


VL 


パレ トブ レト リバ 


жат. 


CRT 出力 編 


ө2041Н- 
IN: キ ャ ラク タ ・ コ ユ コード 
ОСТ: 
ВКЕАК: 
Areg が 示す キャ ラク タ を CRT に 出力 し 
£T. 


e20D7H 一 
IN: HL… 文 字 列 の 開始 アド レス 
ULT 


BREAK : AF, HL 

HLreg の 示す アド レス か ら , 00H が ある 
š C жле CRT et 9 
e20EAH ~ 
IN: HL… 文 池 列 の 開始 アド レス 

B… 文字 列 の 長き 

OUT : 
BREAK : AF, HL, B 

HLreg の 示す アド レス か ら , Brego È 
る だけ 文字 列 を CRT に 出力 し ます . 


最後 に … 


現在 。 PV-2000 で マシ ン 語 の ゲー ム を 作 
っ て いま す . 皆さん も , これ ら の ROM ル ん 
ン を 使っ て ゲー ム を 作っ て み で くだ さき 
v. それ で は また 会 う 日 まで … 
ФА ва 


"グロ グラ ム ポ ボ ポシェット "。 '854EVOL.1, 


徳間 書店 


と 思い 本 屋 に よっ て いる と , な ん と PiO が 2 冊 し か な い . あぶ な か っ た な あと 思い つつ 。 PiOPiO を 
っ て る ん で すか 。」 t, 
ー ボ は 速い ん で す . し か し , その ころ は X1 タ ー ボ は 出 て な か っ た ん で す よ ね ぇ えー. 


ほめ られ て し まい まし た だ (p.74). 確か に ド タ バ リ アン さる 
それ に ,。 S1 だ っ て 工業 祭 の と き 〇 


ト が 何 秒 な の か な ? な ん て , や っ て いら れ な か っ た ん 


JH-100 


BASIC+ 7 > ZšË 


FIRE CRACKE 


ee 


時 限 爆弾 の テス ト の た め 地 下 実 験 を する 


は ず だ っ た が , 間違っ て 破壊 力 の 大 き な も 
の を 埋め て し まっ た . 早く 処理 し な いと あ 
た り 一 帯 に 大 地雷 が 起き を て し まう . 

そこ で あな た は , 水 に 弱い この 爆弾 を 地 
下水 脈 に 落と し て 処理 する こと に し た . と 
ころ が , そこ に は カエ ル 型 化け 物 ベ ー ゴ ン 


が 住み つい て いた の だ っ た …. 
詳 プ ログ ラム ・ イ ン フ ォ メ ーション 


に 。 | | BASIC 
| 1 " マシ ン 語 С000-С077 
cE 2000—3351 


Ud ょ (ある バタ ー ン の パズル ・ ゲ ー ム 
| だ けど , 高い 所 か ら 落 と す と 爆発 す 
"ett, よく 考え て ある ね . (V) 


Ф) х Р 1 (BASICO を 入力 , モーグ". 
の リスト 2( マ シン 語 : %С000- %С077) を 
PiO'85 年 3 月 号 に 載っ て いる 迎 夢 快 人 き 
ん の モニ タ な ど で て で 入力 , MSAVE'F.C:P", 
$COOO,$COZ77 と し て セー ププ. 

- @! XF 3 (マシ ン 語 : $2000 一 $3351) ҒА 


J), MSAVE"F.C: M",$2000, $3351 
と し て セー ププ. 


リス ト 1 を ロー ド し , RUN す る と 残り 
の 2 つ を ロー ド し て スタ ー ト し ます . 


せっ か く 掘 っ た の に , ベー ゴン が いっ ぱい 


gas 


% 

% 

£ 

# 

4. 

$ 

$ 

r1 

% 
im 
im 
і 

: 
13 

i 


hkkkkkkkkkkAkkkkk&k. 


で す よ ょ HEK さ ん . 


P.S. 学校 に IF800 モ デル 20 が 20 台 ある ん で す が 。 š 


あな た は DIG BOY で す . [t][M|[3][k] 
で 移動 し た り , 容 を 堀 っ だ り し て 時 限 爆弾 
を 爆発 する 前 に 水中 に 落と し まし ょ う 

石 や 爆弾 は 下 が 土 な ら ば 堀 っ て 落と すこ 
と が で きま す . まだ た だ, 爆弾 は 左右 に 押す こ 
と も で きま す . し つこ い ベ ご ベー ゴン は 石 や 爆 
弾 を 落と し て つぶ し まし ょ う . た だ だし, 爆弾 
は 石 に 押し つけ たり, 高い 所 か ら 落 と す と 


爆発 し て し まう の で 注意 が 必要 で す (水中 


へ 落と し た と き は 大 丈夫 ). 

ыы, | 一 | キー を 押せ ば 自殺 し , 各 面 ス 
ター ト 時 に [Al キー を 押せ ば や り た い 面 か 
ら スタート, ゲー ム ・ オ ー バ バー 時 に 


[RETURN キー を 押せ ば 再 ス ター ト で す . 
面 作成 
ыы P g 1 


この ゲー ム は コン スト ラク ショ ン 付 き で 
з. 自分 で 好き な よう に 面 を 作っ て くだ る 
с, タイ トル 時 , ゲー ム ・ オ ー バ バー 時 に 
|E| キ ー を 押せ ば エディ タ ・ モ ー ド に な り 
ます . 次 に 各 コ マン ド の 説明 を し ます . 

コマ ンド S( セ ッ ト ・ エ リア ) : 面 を 作成 
し ます . 何 面 を 変更 する か 入力 し た 後 , 自 
— r s 

[1 |w[3|[x]: ター ソル 移動 

an Lis AIC Sik in DEL 
ペー ス ) : キャ ラク タ を セッ ト 

X] : ペン ・ T» 

[F]: 画面 を 土 で 埋め る. 

[-]: コマ ンド 待ち に 戻る 

| RETURN | : 爆弾 の 数 を 入力 し て 画面 作 
成 終了 

コマ ンド T( テ スト ・ ラ ン ) : 作成 し た 面 
が 解け る か を テス トト する. ベー ゴン も 出 て 
こない し , 時 間切 れ も あ り ま せん . 面 ク リ 
ZH, ゲー ム ・ オ ー バ ー 時 に は コマ ンド 待 
DCRI Т; м, ゲー ム ・ キ ーー 時 
に | RETURN キー を 押す と 再 テ スト で す . 

コマ ンド D( デ ー タ ・ コ ピー) : 指定 し た 
面 を 移動 きせ る と き に 使い ます . 
"FROM?" に は どの 面 を 移動 る せる か を, 
"TO?" に は どこ に 移動 きる せる か を 入力 し 
COS v. 

コマ ンド 3( デ ー タ ・ セ ー ブ ) : 面 デ ー タ 
а Е о ОВ мМ В З оаа": 1 


=PiO -&*+ 6 АЛС 35»? 


AIIA 


EDI HITD 


Ш ( (¥2 KEP 


; t fm 


=| sconE 


yw 


н 8 
*] PpioBOYv-5 


|| TME 
* өз 


t] AREA: 18 


BASIC に 戻り ます . 

コマ ンド 4 (デー タ ・ ロ ー ド ) 
を ロー ド し ます 。 

コマ ンド 5( ゲ ー ム ・ ス ター ト ) : ゲー 
ム ・ モ ー ド に 戻り ます . 


・ 面 デー タ 


この ゲー ム は 全 25 面 で す が , 40 面 まで 増 
や すこ と が で きま す . 30 行 の R2= テ 25 を 変 
ん た て (だ きい £X SUE 
に や られ る と いう 人 は , 290 行 の MOD (Т, 
4) の 4 を 6 ぐ で ぐらい に し まし ょ 2 う . 
が 少し 遅く な が り ま す . それ で も クリ ア で き 
な い 人 は エディ タ の イコ ュ コマ ンド で 遊ぶ し か 
あり ませ ん . ちな み に , 3 に する と 最速 に 
な b 7, 


終わ り に 


この ゲー ム で あっ け な く や られ て し まう 
化け 物 ペ ー ゴ ン 。 実は 。 この ペー ゴン は 区 
化 祭 で 僕 の クラ ス の ビデ オォ 作品 THE 
BAGON” で 探検 隊 に 追い か けら れる 役 で 
登場 し た 化け 物 な の で す . し か し , 友人 に 
似 て な いと 言わ れ て し まい まし た だ 。 АЖО 
8X8 ド ッ ト で は あま り 似 せら れ ま せん . 本 
当 は 2 本 足 の 舌 を どら り と だ らし だ カエ ル 
の イメ ー ジ な の で す が . 
P.S. この ゲー ム は , JRT ORNATI Z% 
ン ・ ゲ ー ム を / 思っ て 作っ だ の で す 
が どう で し ょ うか . 後半 の 面 は 結構 難し い 
と 思い ます . この ゲー ム を 快 人 る ん や 
JUFC の メ ンー ( 僕 の 会 員 No は 13 で す ) 
に プレ イ し て も ら っ だ と ころ , な か な か 好 
で も を 
PSI いろ いろ アド バイ ス し て くれ だ が 高 
橋 君 。 ど う も あり が と う . 
3 参考 文献 
津田 一 夫 * 
84 年 7 月 号 


ペー ゴン 


"SNAKE ZONE”, PiO, 


(ポテ トチ ッ プ ス の こ な ) 


63. 


аай 


` 


KREM++++++++++++++++++++++++++ 
REM+ í 
REM+ 
REM+ 
REM+ 
REM+ 
REM+ 
REM++++++++++++++++++++++++++ 

REM 

10 IF (PEEK ($C008) < >@) + (PEEK ($C@@9) < >$ 1C) 
MLOAD"F.C:P":PRINT 

20 IF(FEEK($2000) < »$9F) + (РЕЕК ($2010) < > $F 
7)MLOAD"F.C:D" 

50 ОРТІОМСМОрЕ1:рІМС (5) ,Е (5) ,RCX) 。D (5) ,B 
‹4): Н=0: К2=25: GOSUB1590 
C(1)2-32:C(2) =-1:С (5) =1:С (4) =0:С (5) 23 


СС FIRE CRACKER 11 


P.C.G %С000-%С077 
DATA %2000-%2251 


OO NO O bi N m~» 


B(1)2$80: Е (2) =$8A: E (3) =$86: В (4) =$89 
IFK-69G0T01240 
V-0:R1-1 
R-R1:98-20: M-5: 605081090 
GOSUB 840 
100 O-0:PICKB:B-B-72:1FE--27 GOTOZ9Q 
110 IFPEEK (A) »$87GOTO290Q 
120 IF (B<1) + (В>5) + (В=4) В-4: GOTO2:Q 
130 РОКЕА,%80+В: Р=РЕЕК (A+C CE) ) : IFF^$8AGO 
Т02%90 
140 ІҒ(Р>2%88) + (A+C (В) < $C180) Б-4:650Т70220 
150 IFP-$87GOSUB 660:В-4:60Т70250 
160 IFF= ま BB ロ =2』 GOTO230 
.170 IFF-$80G0TO2:0 
180 F=FEEK (A+C (В) ~32) : IF (P2$86) + (P2$89) E 
=4: GOTO2:0 
190 РОКЕА+С (В) ,$80: L-PEEK (A+C (E) #2) 
200 IFL»$8A し = ва- $84) : ІҒі =%В0РОКЕ 1, ФАА: 
BEEF: 5=5+50: 60506650 
210 IFL< >%800=1: 60Т0250 
220 РОКЕА+С (В) #2, $86: 0=5 
230 РОКЕА, $80: A=A+C (В) : POKEA, $BO*B: Р1=РЕ 
EK (A+C CE) +32) 
240 IF (0=5) + (Р1=%80) + (F1=$BE) ) X=A+C (B): 
Y-$86:GOSUB 710 
250 IFO-1GOTO350 
260 IFO-2GO0TO390 
270 T-T-(V-Q) :LOCATE16, 28: PRINTSFC ( (Т<10 
00) + (7<100) + (Т<10) ) 』 T; 
280 ІҒМ=060508550: GOTO 90 
290 I=MOD(T,4)+1:IF(I>Z)+(V=Z)+(D(I)=1)G 
отох4@ 
300 U=PEEK (E (1)): IFUX$ER D(I)=1:GOTOšaQ@ 
310 РОКЕЕ (I) ,R(I) :L= (MOD (E (I) 。 さ 2) MOD (A, 
32)) *RND(2) 
320 E(I)=E(I)-Z2-SGN(L):IFE(I)<$C180 ЕСІ 
)=$CZ64+RND (14) 
550 К(І) =РЕЕК (Е (1) ) :POKEE (I) , $8R+ (К (І) >$ 
85) + (RCI) 2$86) + (RC ) =%89) ж2 
540 ІҒТ>060Т0100 
350 ҒОКІ-17050:РОКЕ1,%АА:ВЕЕРІ 
560 OPTIONCMODEQ: FORJ-1TOI 
370 BEEFQ@: ОРТІОМСМОРЕ 1 : FORJ=1 TOI 
580 NEXT:NEXT:GOTOA44Q 
290 FORI-1TO16:FORJ-1TOI 
400 FOKE1,I*16: BEEF1:POKEA,$814RND(4) 
410 NEXT:FORJSITO1STEP-1 
420 FOKE1,1I*16: BEEF1:POKEA, $BO*RND (2) 
430 NEXT:NEXT 
440 M-M-1:LOCATE1Z,31:FRINTM; 
450 IFM»OGOTO 90 
460 LOCATE10,71PRINT" ーーーーーーーー っ " 
470 LOCATE11,7:PRINT" | GAME |" 
480 LOCATE12,7:FRINT" | OVER |" 
490 LOCATE12,7:PRINT" LL n 
500 IFH:S H=S 
510 FICKK: IF ( ソ = さ ) ж ( ド =1 さ ) Rl=R:GOTO 80 
520 IF( ド に =69) + (V=3) 50701240 
520 IF に =1 さ GBDTO 80 
540 60Т0%510 
550 LOCATE11,4:PRINT"LNEXT FATTERNJ" 
560 FORI-1TO256STEF8:FOKE1,1:BEEP1:NEXT: 
ВЕЕР@ 
570 ІҒУ-2б60701240 
580 S-S*T/2:R-R*1:M-M*1: IFM}5M=5 
590 GOSUB620:LOCATE12,21: PRINTM; 
600 IFR=R2 R=1 
610 FORI-1TO1000:NEXT:GOTO 90 
620 LOCATE20,29:PRINTSPC ( (NX 100) + (NZ10)0) 
sN; 
630 LOCATE11,27:PRINTSFC ( (8 10000) + (5:10 
の の 9)+(S< 1 の の )+(S< 1 の ) ) 38; : RET 


Ы 盗み まし ょ 


だ た と えば ある 機種 の CPU は 学習 は し た が , 
t, を こ で つま ずい て し まう の で す ( 当 た り 前 と いえ ば それ まで の こと で すわ ね). 


640 PICKK: 
650 RET 
560 РОКЕА+С (В) ,ФВ0: РОКЕ1 , ФАА: BEEP1: BEEPO 
: X=A+C (В) 722: Y2PEEK (X) 

670 ІҒҮ>ФВА Ү=В (Ү-ФВА) : ІЕ (Y2$86) + (Y2$89) 
РОКЕ 1 „ФАА: ВЕЕР: 5=5+50: GUSUEB6 さ の 

680 IF (Ү>%86) * (Ү:>Ф89) RET 

690 GOSUB 710: КЕТ 

700 IF(K>72) *(к<78) Б0ТО1440 

710 Ы-Х:Ғ-1:РОКЕ1,%СС 

720 FOKED,$80:D-D«22:FOKED,Y:P-PEEK(D4*Z2 
) : BEEF 1: BEEF の 

730 ІЕР>%8А F-B(F-$84):IFF-$8QFOKE1,$00: 
BEEP: S=S+5@: GUSUB6 マ の 

740 IFD»$CZ1FFOKED,$80:FOKE1,100: BEEF: PO 
KE1,170: BEEF: F=$88: GOTO 790 

750 IFF-$860-1:RET 

760 ІЕР-%80 F-F«1:GOTO 720 

770 IF(F23)*(Y-2$86)0-1:RET 

780 IFP-$810-2:RET 

790 IF(Y-$86) * (Р=%88) NZN-1: G=S+ 1 の の 』 GOSUE 
620 

800 X-X-22:Y-PEEK (X) 

810 ІҒҮ>ФВА Y-B(Y-$80):1F(Y-$86) + (Y= を $89) 
FOKE1 , $AA: ВЕЕР: 5=5+50: 5050В620 

820 IF(Y-$86)*(Y-2$89) GOTO 710 - 

830 RET 

840 L-$20144197* (R- 1?) *FORI-QTO1Z 

850 Х<%С184%1%52:Р0КЕ%2006,Х/256-1:РОКЕ% 
2007,X 

860 Х=Х+14: РОКЕФ2000, Х/256-1: РОКЕФ200Е , Х 
870 X-L*I*14:POKE$2007 , X/256: POKE$2004 , X 
880 N=USR ($2000) : NEXT: A=$C18A: T-2000: N-F 
EEK ($2014*197* (R-1)) 


ІҒк<>060Т0640 


890 LOCATE18,4: PRINTFLD(10s"C(CCCCCCCCCC 


бы 

900 LOCATE19,4:PRINTFLD(1);" 
910 LOCATE12Z,21:PRINTM; 

920 1 ОСАТЕ 16,28: РКІМТ2000; 

930 і ОСАТЕ 18,29: РКІМТЅРС ( (RX 100) + (R< 10) ) 
РК; 

940 LOCATE20,29:PRINTSPC ( (NZ10Q) + (NZ10)) 
SN; : IF (V=1) + (V=3) RET 

950 IF (V=4) + (V=5) GOTO(1020* (V-5) #10) 

960 ҒОБІ-1Т05:р(1)-0:Е(1)-%С224%(І-10%16 
Q*RND (14) 

970 R(1) =РЕЕК (E (1)) :POKEE I) , $8R+ (R( I) > を 
85) : NEXT 

980 FORI-1TO10Q0Q 

990 PICKK: IF (К>72) # (K< 78) RET 

1000 ІЕК< >65МЕХТ: КЕТ 

1010 GOSUB64Q 

1020 A$-"AREA":IFV-5 A$-"FROM" 

1050 LOCATEZ,7:PRINTA$;: INPUTR : IFV=4 V=3 
1040 LOCATEZ,7:FRINTSFC(11) 

1050 IF (R<1) + (R>R2) GDTD1 の 2 の 

1060 Ri-R:1FA$-"FROM" A$-"TO":GOTO 840 
1070 ІҒАФ="ТО" RET 

1080 GOTO 840 

1090 CLS:FORI-$C116TO$CZF6STEPZ2:FOKEI,$ 
5А: NEXT 

1100 RESTORE:FORI-QTO11:READY,X,G$ 

1110 LOCATEY , X: PRINTG$; : NEXT 
1120 рАтА0,23,----------,2,24,ҒІБЕ,5,2 
5, CRACKER 

1130 DATAS,23, 
>19。24 。SCORE 。 1 1 。 さ 1 。 の 
1140 DATA13,24,DIGBOY 5,15,24,ТІМЕ,16,28 
2000 | 

1150 БАТА18,24,АКЕА  1,20,24,BOMB 0 
1160 LOCATEB, 27: PRINTSPC ( (H< 1@@@@) + (H< 10 
g の )+(H< 100) + (Hz 1 の ) ) ; ін; 

1170 | ОСАТЕ1,1:РКІМТЕІ (1) з 
пинин д 

1180 FORI-$C141TO$CSCISTEFZ2:POKEI,$84:F 
ОКЕ1+19,%81: МЕХТ 

1190 LOCATE22,1:PRINTFLD (1) ; "ут 
HHHHHHHHH 

1200 FORI-$C16ZTO$CZ28ZSTEPZ2:FOKEI,$84:F 
ОКЕ1+15,ФВА: МЕХТ 


47,24,НІ SCORE 


* non non n on onm nm on onm 


71210 LUCATE18。4:FRINTFLD(1) 』"((((((((((( 


єссє" 
1220 LOCATE20,3:PRINTFLD (1); " 3c 9363€ 
に ネネ ネズ °" 

1230 RET 

1240 605081090: К1=1 

1250 1 ОСАТЕЗ, 6: INPUT"COMMAND" ,A$: LOCATE: 
зб: PRINTSPC(12) 


これ か ら は マシ ン 語 で プロ グラ ム を 作り た いと お 考え の 方 へ . 私 も いま だ に オー ル ・ TVLEOTa72 AAT 


- 


その 機種 の グラ フィ ッ ク の 表示 方 法 が よく わか ら な いな ど , 


リス ト 1 FIRE CRACKER BASIC!) A F uuu 


1260 IFA$-"T" V-4:GOTO 80 
1270 IFA$-"D" V-5:GO0SUB1020:GOTO1520 
1280 IFA$-"G"GOTO 70 
1290 IFA$-"S"CLS:MSAVE"F.C:D",$2000, ($20 
14*197*R2) : END 

IFA$-"A4"CLS: MLOAD"F.Cs:D":CLS: GOTO12 


ІҒА%:>"6"60Т01250 
У=1:Х1=4:Ү1=4: GOSUE1020: С=РЕЕК ($C18 


IFV-2 С-Р 
POKESC10Q«X1*Y1*232,C:POKESCIBA, $85 
PICKK: Х1=Х1- (К=74) * (X154) + (K 275) * CX 


Үі=үі+ (Е=77) + (ү1<17) – (К=75) ж (ү1 х4) 
IFK-81 V-2:F-$8A 

ІЕК-87 У-2:Р-%87 

ІҒК-65 У=2:Р=%89 

IFk=83 У-2:Р-%86 

ІЕК-90 У-2:Р-%80 

ІҒК-88 V-1 

ІҒК-706050Бв1560 

ІҒЕ=15 60701490 

IFK-45 60508640: 60701250 
С-РЕЕК(%С100-Х1%Ү1ж52) 
РОКЕ%С100%Х1%Ү1ж%52,9%Уу 
ҒОКІ-170100: NEXT: GOTO133@ 
50508640 

LOCATE3,7: INFUT " EOME" ,N 
LOCATE3,7:FRINTSPC(11) 
РОКЕФ2014+ (R-1) *197,N: à7$2015* (R-1) 


FORI-4TO17:FORJ-4T017 
FOKEA,FEEK ($C100-1I*224J) 
А=А+1 : NEXT: NEXT: GOTO12S50 
LOCATE4, 4:PRINTFLD (1); SFC (14) 
FORI-STO17:LOCATEI,4 
FRINTFLD(1);" 


"Ss NEXT:R 


CLS:FOKE1,100: ҒОКІ=1Т050: BEEF 1: REEF 
Q: LOCATERND (19) , RND (22) 
1600 FRINT"*"::NEXT 
1610 LOCATE9,9:FRINT" FIRE CRACKER " 
1620 LOCATE20,2:FRINT"LKEYJ І" 
1630 ( ОСАТЕ21,8: РКІМТ "Ј+К" 
1640 LOCATE22,9: РКІМТ "М 
1650 LOCATE27,22:FRINT"TO START"; 
1660 FICKK: IF (k=1 3) + (К=69) КЕТ 
1670 GOTO1660 
1680 REM 
1690 REM» 333 3 3 3 33€ X 3 3 3c € 3€ € 3€ 3€ € 3 ¥ ¥ 
1700 REM* 
1710 REM* 
1720 REM* 
1730 REM* BY 
1740 REM* 
1750 REM* 
1760 REM* 
1770 REM* 
1780 REM* 
1790 REM» 33 3 3c 3 3 Jc Y 3€ 3 € 3€ 3€ Y 3€ € 3€ € 3€ 3€ 3€ 9€ 


PUSH. CRET] KEY 


FROGRAMED 


BAKUHATSUTARO 


JUFC (NO. 13) 


Kk 本 本 k £ £ 本 ж 


ШІ/ДК2 FIRE CRACKER t«522-7—5HB 


ГҮ Күч? чө 
マシ ン 自 身 の こ と を 理解 し て いな い 


を そこで, 人 人 の 作っ た プロ グラ ム か ら そ の テク ニッ ク を 大 い に 
LA tor め の PiO な ん で すか ら ね . CET СУЕ аа СИЕ は いけ ませ ん よ / 


к AE MEE ERRARE U 


リス ト 3 FIRE CRACKER マシ ン 語 リス ト 


+7: SUM 
ВА: 45 
87: 4C 
87:58 
> 80: АС 
80: 05 
80: 09 
89:2D 
89:27 
87:38 
87: 3A 
89: 3C 
87: 3B 


+7: SUM 
87:58 
80:0Е 
80:00 
86:15 
80:09 
87:27 
87:10 
80:37 
80: 07 
80:17 
89319 
80: 09 


87:38 | 87:38 
ВА: 37 87:36 
89:40 87:38 
Ва: 36 87:42 
BA: 3E Ва: 41 
87:40 
87:42 
87:40 
Ва: 49 


87:58 
87: 3C 
87:38 
87:40 
89: SC 
87: さじ 
86: ЗА 
89t 3E 
87: 3A 
87: 3E 
89: 3E 
89: さじ 
87: うじ 
89: 3E 


+7: SUM 
80: 24 
87: ЗЕ 
87:55 
89:42 
ВА: 33 
8A: 3E 
80: ØA 
80: ØA 
ВА: 2C 
80:14 
80: 3C 


+75 SUM 
87:0E 
87: 3E 
873 3C 
89:38 
87:34 


( 再 試 で 愛す る 故郷 へ 帰れ な い A.F.M) 上 


2412, 


ノ ス ト 3 FIRE CRACKER マシ ン 語 リス ト 


+2 +3 +4 +5 +6 +7s:SUM 
87:41 
Ва: 41 
ВА: ЗЕ 
87:40 || ——— Y 
87: 3A 
87:44 
ВА: 47 
ВА: ЗЕ 
ВА: 41 
Ва: 44 
87:47 s 2 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


+7: SUM 
87:2D 
80:2 
OPEN PEOR Sh E baa a ны SRI Min : 80: 3A 
80: 1E 
80: OE 
80:91 
80: の F 
871 3C 
87:40 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 87: 3D 
SA: 3 


+7: SUM 
80:27 
80:20 
87:2D 
89: 2E ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 
89:2 
87:2 
89:29 
BA: 2A 
80: OE 
hi Jis ORC biis D ден ойша айы Lo M ақы дес маса 80: 38 

87:29 
80: ささ 
ВА: 56 
85:30 
87: 3B 
87:30 

87: 3A 

87: 3E 

87%3С 

87:28 

ВА: 4A 

ВА: 4D 

85:91 Же үа з жаш a ie e Мален wawa a RE RS Si 


87: 3E 

ВА: 46 

ーーーーーーーーー ニ ーーー ニ ーー ニーーーーーーーーー ニ ーーーー ご ーー 89:43 
87:44 

ВА: 44 

, 871 3C 

87: ЗЕ 

87: 3C 

ВА: 44 

ЕЕЕ Т РРР РАР Oii iint ut арабы суың 87: 3E 
87:41 


MM MM MÀ — س م‎ sesan ーーー ーー ーーー ーーーーーー ーー ーー ーー ーー — HÀ n ーー ーー ست‎ ーー ーー ーー ーー ーー ーー 


80:/05 

87:32 
ə-лҢҺ------------------------------ 87:56 
87:47 

86:46 

87: 3D 

87: SF 


> ズバ リノ СРІРІО” £ "OF" の 違い . "OF" に お いて は 主役 は あく まで も 編集 部 .、 だ が それ に 対し て , 我ら が "PiOPiO" の 主役 は ま 
さき に 読者 に 他 な ら な い の で ある . IT, 話 は 変わ る が 君 は いわ ゆる “マシ ン 語 " と "機械 語 " の どちら の 方 が 好き か ね ? A, 我輩 は 無論 後 
者 の 方 が 好き さる. その 方 が 専門 家 っ ぽい か ら ね . 高見 君 、 か ら か っ て し まっ な だ よう で 済ま な か っ た ね . Robin さ ん , 我 幕 は 下手 に ポケ コン の 
機械 語 な ん か に 興味 を 持っ だ た ばっかり に , "ハッカー" 化し て いく 自分 が 恐ろし く て な り ま せん . MR, "= у" に な り た い ノ 以上 


/ 
\ 


pio 


+ë +7: SUM 
ва 87:46 
87 87: SB 
87 ВА: 45 
8A 87:40 
ВА ВА: 47 
87 84:41 
87 87:3C 
87 87:38 
ВА ВА: 45 
87 87:41 
87 84:44 
8A 87: 3D 
87 ВА: 44 
87 80:46 
87 87:47 
80 85:95 


78 83:71 UE + る +7: SUM 
80: 9E 
+6 +7: SUM = ва: 20 
ва 89:09 д 89:37 
87 86:46 る 87:40 
87 87:37 312 89:40 
ва ВА: 44 5% 87: 3F 
89 ВА: 40 512 89: 3C 
ВА 87:3E кыл RT ва: 42 
87 в87:са қ. 87:і3С 
87 86:3С > 87: 3B 
ВА 87:46 1 87:38 
87 87:58 2 87:40 
87 87:3C 
87 87:40 
87 86:324 
87 87:3A 
87 87:26 


+é +7: SUM 
"ВА 87:3 
87 87:3F 
87 87:3E 
87 87:3E 
87 87:3B 
87 87:37 
8^ 8A:4D 
89 80:ЕС 
80 80: OE 
87 87:39 
87 87:57 
87 87:42 
87 87:40 
89 89:45 
89 84:47 
87 87:40 


87: 3D 
ВА: 4E 
87:40 
ВА: 3B 
00:84 
00: ЕС 


75 60:40 


*6 %7:50М 
2060 89 87 87:40 


^ 
| 
b 
) 
ү 


ガロ ドク / が ラル JA | 
— ер еее — А аі 9.9.9090 


ATCH & CAUGHT Tm 


PC-6000 シ リー ズ 用 の , た っ た 20 行 し か | 5937. 最後 に 
な い プ ログ ラム で す . 一 応 頑 張っ た の で 入 プロ グラ ム の 説明 MrJPC と いう 新しい パソ コン が 出 ま し 
カカ し て みて くだ さい . 論理 式 を 多用 し て いま す が , ТЕХ е だ 。 元祖 PC-6001 は 古び て いき ます が , à 
遊び 方 | う よ り は 少し 速く な る よう で す . だ まだ 頑張 れる は ず で す . 
ペー ジ 数 は 1 一 4 で グロ グラ ム を 入力 し CATCH & CAUGHT BASIC!) X F 」 LLL 
i 55 まい 。 X2, Ү2: РКІМТ"#"; 
あな だ た は "е" て # を 捕え て 〈 く だ さ Ееее SERTRIR OU o HR AR Ed» (қыл 
t. キー 操作 は | SPACE | キー だ け で , 1 ) siFLAY"o6c16" 
回 押す ご と に "e" の 進行 方 向 右 回 り に 変 


° 
$ 
> 
Ф 
: 
< 
: 
5 
94 
[2 ( 
П 2 
D 
< 
4 

K l; 
2 
l, 
) 
X). 
jaj 
T 
S 
ў 
T: 
ES 
の 4 
2, 
Ф 
Ф 
> 
% 
м 
» 
> 


47” 
МІ 
dp 
АН 
11 
4 


"y 
ç 
o 
4 
24 
Ф 
$ 
)< 
Фф! 
. 
>< 


D» (» <! 
) 
і 

D» (» 《( 


% 

> 
2 
% 
e 
>< 
> 
54 
>< 


%% 
e 
»( 
х 
ç 

p 
2i 


0 ( 
T 
Ф 
6% 


df 

Ф 
Ф, 
22 
2% x 
を ) 
の 

Ф, 


» 


10 CONSOLE6,16,0,0:CLS 
20 X=1:Y=1: XW-B: YW=8: К=1: T=T IME 
50 LINE(128,0)—(128,192),2 

40 LOCATE17, 3:PRINT"TIME" 

100 LOCATE17,S5:FRINTINT((TIME-T) 
/1024) 

500 IFINT(RND(1)*4)«1THENX2-XW-S 
GN(X-XW) ж (XW 15) ж (XWO) :GOTO3 S6 
305 IFINT (RND(1)*3)Z1THENY2-YW-S 
GN(Y-YW) * (YW 15) * CYW20) : GOTO3 SO 
310 X2-zXW-INT (RND (1) #2) *(XW« 15) 
320 X2-2X2-*INT (RND (1) #2) ж (XW^0) 
ささ の Y2-2YW-INT(RND(C1)2*2)3*(YWz 15) 
540 Ү2=ҮТ+ІМТ (RND (1) #2) + (YW»O) 
550 LOCATEXW, ҮМ: РКІМТ" "$;:LOCATE 


510 Y1=Y-(R= の 9) *(Y> の )+(R=2) * (ү<15 
) 

520 X1=X+(R=1)*(X<15) 一 (R= さ ) ж (X20 
) 

550 LOCATEX,Y:FRINT" "3gLOCATEX1 | 
。Y1:PRINT"@"s 

540 X-X1:Y-Y1 

500 IF(X1-X2) OR(Y1-Y2) THEN100 

626 LOCATE17,12:PRINT"VERY GOOD ! 

! "s END 


PCUC22 番 手 で LE. 


(朝臣 小林 太郎 智明 ) 


L) 
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ам 


у CN 
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PC-8000 シ リー ズ 


N-BASIC+ マ シン 語 


Hi-SCORE 


2008060 


Шаш — 864 


お 待た せ し ま し た ( 誰 も 待っ て な か っ た 
り し て …).、 技 の 種類 だ け で 23 種 , 場外 乱 
開 も ある プロ レス リン グ ・ ゲ ー ム "闘魂? 
を 発表 し ます . キャ ラク タ の 組み 合わ せ で 
や っ て いる わけ な の で , 多少 情け な いで す 
が , 許し て や っ て くだ さい . それ で は . 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


N-BASIC 
マシ ン 語 Е000--Е80Е 


ER 
22222 
К 


技 を か ける と ころ が と て も よく で 
き て いる . これ は 動か し て みな い 
と わか ら な い ぞ . (A) 


ブロ グラ ム だ つて 


$ 

BASIC が や だ ら に 長い で すす なー 一. 変数 
Ij, メモ の 紙 を な くし だ の で 忘れ まし だ が , 
主 な も の は 表 1 に まとめ て お きま す . マシ 
ン 語 は キャ ラク タ の 表示 と を その デー タ で ら 
いな も の で す (#2). 


3:95 


デモ 中 に [| RETURN | キー を 押す と 始ま 
り ま す . 左下 の 男 が あな た で , 右上 か らく 
る の が 敵 の “ ザ ・ ア ウト ロー* です. 自分 
[8], [2]. [4], |6| キ ー で 上 下 左右 に 動 
きま す . 複数 の キー を 押す こと に より 斜め 
に も 動け ます . 

_ 技 の か け 方 は ,. まず 敵 の 横 (ぴっ た り 真 
横 に 並ば な けれ ば な り ま せん ) に つき , Bk 
の 手 が 下 が っ だ と き に ぶつ か っ て いく と, 

足 四 の 字 固 めで 相手 を GIVE ОР 


Hi-SCORE 20000 


$0 
5% 


& 
#00 


us gs 


S.1 乱 筆 乱 文 失 礼 , 


=, この ヤロー ノ メ 反則 技 を 使い や が っ て 


ATACK サ イン が 出 て , その 下 に 技 の 名 が 
出 ま す . ここ て |SPACEI キ 一 を た た いて い 
る と 技 の 名 前 が どん どん 変わ り ま す . そう 
Бао УГО КОЕ で る 
[GRPH| キ ー を 押す と , あと は 自動 的 に 技 
が か か り は ます . 

基本 的 に , 技 と [SPACE| を た だ た だく 回 数 と 
の 関係 は , Я3, 4 の よう に な っ て いま す 
D, と きど き 変 則 的 に 飛ぶ こと が あり ます 
(それ に よっ て 必殺 パタ ー ン が くず れる ). 
まだ , ATACK サ イン が 出 て も , も だ も だ 
し て いる と 敵 に 技 を か けら れ て し まい ます . 

技 を か けら れ て , 敵 が 倒れ て いる 間 に 
|@RPH キ ー を 押す と フォ ー ル し ます .。 c 
れ で カウ ント 3 が 入れ ば 一 面 ク リア で す . 

場外 で は [4], [6] キ ー で 移動 , [8] [2] 
キー で リン グ の 登り 降り で す 。 あと は リン 
グ 上 と だ いだい 所 や ЖС” 

山 が 赤く な っ て いる と き に 組み 合っ た り , 
まだ 敵 の 体力 が ある うち に 固め 技 ( 足 4 の 
字 や 中 固め な ど ) を か け だ りす る と, 敵 か 
ら の 攻撃 を 受け ます . この と き , 画面 上 部 
の パワ ー の 表示 が RED!′ の と き は 非常 
に 危険 で びす. ワー が “RED” に な っ た 
6 場外 に 逃げ て , フ パ ワー の 回 復 を 待ち まし 
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Ai. 

実は この ゲー ム の 元 と な る プロ グラ ム は 。, 
84 年 の 5 月 に 完成 し て いま し だ . それ を 
グラ フィ ッ ク 化 し だ も の を つい 最近 まで 制 
作 し て い だ の で す が , モー ブ の ミス で あっ 
と いう 間 に 2 パ や ー に し て し まい まし だ た だ. 
実は 赤 コ ー ド が 抜け た まま セー し ただ の 
に 気付 か ず ,。 ベリ ファ イ も し な か っ だ の で 


す . 次 の 日 再生 し て みる と ,。 そこ に は を む な 
L < 会話 ど けが 録音 きれ て いま し た . 

201%, 気 が 抜 け て や り 直 す 気 に な れ 
ませ ん で し だ が 。 12 月 号 の “RADICAL- 
PROWRESTLING" に 上 刺激 きれ , ГЖ 
越 さ れ て な る も の か 」 と 思い , あわ て て キ 
ャ ラク グ クタ て 作り 門 し 、 発表 じ ま し た (X 
を 越 る きれ て な い だ ろ 一 な 一 )。 も し よかっ つっ 
5, グラ フィ ッ ク 版 を 作り 直し , 発表 し 
だ いと 考え て なり ます ( 先 の 話 だ )。 

それ か ら 今 , 全 512 面 の スー パー ゲー ム 
を 思考 中 だ ぜ . 受験 が 終わ り 次 第 作り , Ж 
表し だ いと 思っ て る わけ な ん だ な (これ も 
また 先 の 話 だ が ). 


表 1 主 な 変数 表 


キャ ラク タ 表 示 サ プ 
キャ ラク タ ・ デ ー タ 
各種 デー タ 
企業 秘密 


表 3 リン グ 内 の 技 

H 得点 
абыз AA. майдай дені 
EIEL 2. аанай 
ЄРТ LIT ДӘРЕСЕ 


: | 100] 
"ロッ プ キ ッ |100 

に 
CEE КҮ АҒА AM RI: 
| EwXW*9 |2001 
Wire id C CENE IN 
トド ウェ スタ シラ ラリ アッ トド” |€600. 
EA EAT ARIES 5 
| ダブル アーム スー プレ ックス | 300| 
バッ ク ド ロ ッ プ  .1800| 
| アル ゼン チン バッ ク プ リー カー | 200 | 
200 | 

|600. 

L600 | 


ジャ ー マ ン スー プレ ックス (ホー ルド ) 


А 


X4 場外 の 技 
技 


鉄柱 攻撃 


で ぐ わ ー っ / グ 先月 か ら 気 力 に 頼っ て 必死 に 入力 し て いた 「 避 剣 物語 」 が 暴走 し て し まっ た . 最後 まで 入力 が 終わ っ て 「 ち ょ っ と 見 て みょう 」 
と 思っ だ の が 運 の 祥 き 。 プロ グラ ム は 凌 走 の 果て に 消 減 し て し まい , 力 を 失っ た 僕 は 毎日 プロ レス ゲー ム を や り , 牛乳 に 濁 れ て いま す . P. 
P.S2 た だ 今 は 8 時 36 分 17 秒 。 


(一 ゆ じ わい ) 


書き 忘れ まし だ が 。 マシ ン 語 は E000 昌 
か ら E80EH ま で で す . それ か ら , 6-7 
ウト ロー” 3, ドリー ファンク ・ シ ニア の 


m= リス ト 1 МЭЯ BASIC JAF 


10 CLEAR 500,&HDFFD: DEFUSR-&HEQOQOQ: DEFUSR 
1=%&HE の の D : DEFUSR2=&HE7FE 

20 REM ---------- INIT 

20 DEFINTA-Z2:DIMMA$(1) ,RB$(1) ,F0(2) ,FOS$( 
2) 

40 DIM WZ$(15) ,JW$(15) ,S(15) ,F(15) ,GE (90 
) ,EK (71) 

50 FORI-1TO15:READWZ$(I):NEXT: CONSOLEQ, 2 
5,0,1:WIDTHA40,25 

80 FORI-QTO2:READA$:FORJ-1TOS:JW$ (I«S4J) 
-A$:NEXTJ,I 

70 FORI-1TO15:READS(I) ,P(I):NEXT 

80 A$-CHR$(I1)*STRING$ (3,29) : PD( の ) 22: FO 
1 ) 26: F0(2) 24: H-200 

90 POS(Q)-"RED!  ":PO$(1)-"YELLOW":PO$ (2 


)2"GREEN " 

100 МАФ (0) =" е "+А%+" ШШ "+А%+" | | ":MAS$CI 
MENEN “А6” 8 "+A$+" | | " 

110 RB$(Q@)=" "ARH" WASH" | | "s КЕФ (1 
) =" "АФ" BB "+A$+" | | " 


120 OUT 81,Z@:LINE(@,14)-(2,15)," ",R:FO 
RJ=5T024: FORI=@TO2 

130 ІҒРЕЕК (&HF302«*J*120* 1*2) THENNEXTI,J 
140 COLORRND (1)3*642:LOCATEI,J:PRINTCHRS$.( 
2 さ 6+RND( 1 ) #2) 』s NEXTI 。J 

150 GET64(0,5) – (2,24) ,KKs WIDTH, : PO-&HDFF 
E: YG$2CHR$ (31) «STRINGS (6,29) 

160 S-Q:R0-1:0T-25:PW-30:kG-220:GOSUB 190 
:GOTO 3960 

170 LOCATE12,24: COLOR6: FR INT "ИННИИ 
mm"::GOTO:4O0 


180 REM ---------- CRT and Score print s 


ub 

190 COLORI, 0,0: FRINTCHR$ (12) 5 : LINE (5,4) ~ 
(52, 24) ,"W",6, БЕ 

200 LINE (9。 8)-(27, (20) "8.14 BF : COLOR7: LI 


NE(9,9) -(27,7) , " —",BF 
210 LINE (9,21).-(27:23) ,"-* BFsL DE a 
(9,192, f^ 


220 LINE(28,8)-(28,19) ," I :tLINE(8,6) – (8, 
7) А "` p" 

230 LINE(28,6)-(28,7) ,"A":FORI-8TO28STEP 
20: COLOR2* (1-28) 

240 FORJ-STO2OSTEP15:LOCATEI,J:PRINT"e"; 
:NEXTJ, T 

250 LINE(8,21)-(8,24) ,"W",2:LINE(28,21)— 
(28,24) ,"B",1 

260 LINE(0,14) - (2,15) ," 
(38,15)," ",B 

270 ҒОТЕА (0,5) – (2,24) ,KKsPUTGA (35,5) - (37 
,24) „КК 

280 LINE(Q0,4) -(38,4) ,"7" ,7: COLORS: LOCATE 
23,0:PRINTUSING"Hi-SCORE #####00"; Н 

290 COLOR7:PRINT"77" ":LOCATE12,0: PRINT" 
TIME":LOCATE11,2:PRINT"FOWER" 

300 LOCATEQO,0:PRINT"SCORE":LOCATEZ1,3:PR 
INTUSING"GAME ###";RO 


"ESLINECS4,14)— 


310 COLOR7:S-S*S1:LOCATEQO, 1: PRINTUSING"&V 


####@@";5:51=@ 

320 II-FW*11:COLOR FO(IID:LOCATE 17,2:PR 
INT FO$(II);: COLOR7: RETURN 

SSO КЕМ ニーーーーーーー マ マ start 

540 COLOR7:LINE(9,8)-(27,20) ,"B", 1, BF 
350 LOCATE14,12: PRINT'"GAME START"; :FORI= 
20702000: NEXT 

560 OUT81,30: BEEF1:LINE(14,12) - (23,12) ," 
“",. 

370 BEEFQ:FORI-1TO1Q00: БЕЕРІМОр4:МЕХТ:МІПр 
TH; 

580 X=9: Y=18: TX=25: TY-8: H ビ = ニ さ の : PW-30: 6050 
В210:ТІМЕ%-“00:00:00" 

590 КЕМ マー マー マー ニー ビ マ Main loop 

400 FORT-OTO1: IO-INP(Q):X1-2((IO-2390RIQ- 
235) ANDX >9) ~ ( (10=1910к10= 187) ANDX< 25) 
410 Ү1= (INP (1) =254ANDY 5:8) — ( (10=2510к10=2 
550к10=187) ANDY 18) 


420 LOCATE17,0: PRINTRIGHT$ (ТІМЕФ, 5) ; : IFT, 


ІМЕ%>"00:05:02"6070550 
430 IFABS(X*X1-TX) <ЗАМрАВ5(ҮжҮ1-ТҮ) < SGOT 
0570 . 


440 LINE(X,Y) -CX*2, Y*2) , "Ш", 1 ,R:X=X+X1: Y 


-ҮжҮ1:СО ОК? 

450 LOCATEX,Y: РКІМТМАФ (Т); 

460 X2-0: Ү2=0: 00-00*1: TT-RND (1) #3 

470 ІҒ00<0Т ANDRND (1) >.56070490 

480 X2=SGN(XーTX) : YE= ニ SGN(YーTY ) : BUT05 の の 
490 X2-RND(1)3*3-1: Y ビ = ニ RND( 1 ) * さ ー1 

"500 X2-2X2*— (TX*X2»28ANDTX*X24226) : Y2z2Y2*—( 
ТҮ+Ү2>7АМОТҮ+Ү2< 19) 

510 IFABS(OTX*X2-X) «3ANDABS (TY*Y2-Y) « 3GOT 
0870 


45320 LINE(OTX,TY) -CTX*2,TY*2) , "B" , 1, B: COLO 


R7*(Q020T) #5 

550 ТХ=ТХ+Х2: TY-TY* Y213LOCATETX, TY: РКІМТК 
E$ (SGN(TT)); : COLOR2 

540 LOCATETX*1,TY: РКІМТ "Я"; : МЕХТТ: GOSURS 
20: GOTO4Q0Q0 


| 550 BEEF1:LOCATE15,8:PFRINT"TIME OUT'":GO 


TO3880 
260 REMO omi Atack ! 


マス クマ ン 時 代 と は 無関係 な の で , 遠慮 な 
で や っ つっ びる て て だ る ЖМ; 
BASIC 中 の REM 文 の スペ ル は , メチ ャ ク 


570 X1-20:Y1-0:IFYz»TYORTTGOTOAA4Q 

580 OO-O:LINE(X,Y)-(X*2,Y*2) ,"B",1,BF:LI 
NE(TX,Y)—(TX+2,Y+2) ," 8”, 1 ,BF 

590 GETEA(X-6,Y-2)-(X+6,Y+4) , GE: COLOR7: I 
FX-2TXTHENAX-TXELSEAX-zX 

602 LOCATEAX,Y*1:PRINT" E—N “ЖҮРЕ е 
ч 

610 LOCATEAX, Yi FX<TXTHENPRTNT" ө ";:СО 
LOR2: PRINT"Pi "; :COLOR7: 65070650 

620 СО( ОК2:РКІМТ" Я"; :COLOR7:PRINT" ө" 


L] 

630 BEEPO:JJ-184(Y214)*10Q 

640 WZ-1: COLOR7:FORI-KG*3TOOSTEP-1: ВЕЕР 1 
: BEEPO: LOCATE15,JJ:PRINT"ATACK ' "; I¥KG 
650 IFINKEY$-" "ANDWZ«1STHENIFRND(1) >. ВА 
NDWZ«14THENWZ-WZ-*2ELSEWZ-WZ + 1 

660 COLOR1:LOCATE12,JJ42: PRINTSTRING$ (14 
1135); 

670 COLOR7:LOCATE12,JJ*2: PRINTWZ$ (WZ); : I 
ҒІМР (8) < >259ТНЕММЕХТ : И2=20: GOTO880 ` 

680 COLOR1:LOCATE15,JJ: PRINTSTRING$ (9,17 
5) 

690 LOCATE12.JJ*2: PRINTSTRING$ (14,175) ; 
700 COLOR7:LOCATEO , 2: PRINTWZ$ (WZ); :PUTGA 
(X-6,Y-2) - (X*6,Y*4) ,GE 

710 FW=PW+ (WZ¥2) ж (PW-WZ$*2»1): HPzHF-P (WZ) 
%(4-КО) + (RO 3) : S1 =S (WZ) : GDSUB さ 1 の 

720 IFWZ+12THENON (WZ-12) GOTO2390,2530,26 
з@ 

730 IFFEEK(&HE7OB*WZ) THENGOSUER1620 

740 LINEX(OX, Y) - (X2, Y*2) ,"B" , 1, BF: LINE (TX 
Y) - (CTX*2,Y*2) ‚ "8", 1, BF 


750 FORII-ZQTO-(WZ« 3) *3: FORIZOTOPEEK (НЕФ 


FF*WZ) 

760 A=t%HE718+ (И2-1) #8- (TX=AX) *4* I«2: POKE 
&HDFFE ,PEEK (A) : POKE&HDFFF ,PEEK (А+1) 

770 IFPEEK (&HE778* (WZ-1) ж2+1) THENASUSR1 ( 
AX*256*Y-1) ELSEA=USR (AX*2564 Y) 

780 A-PEEK(&HE79Q* (WZ-1) *2* I) : FDRJ=gTOPE 
EK(&HE7AB* (WZ-1) ж2+1) : BEEFJ MOD A 

790 NEXTJ:BEEFO:PUTGA(X-6,Y-2) - (X*6, Y*4) 
„GE 

800 NEXTI,II:IFPEEK(&HE7BF-*WZ)THEN TX=X+ 
SGN(X-TX) #3 

810 A-FEEK(&HE7CB4WZ) : IFA-1GOTO194QELSEI 
FA-260T02360 

820 WZ-0:PUTGA(X-6,Y-2) -CX*6, Y*4) , GE 

830 IFX«90RX»250RTX«90RTX»25G0T02700 

840 LOCATEQO,Z:PRINTSTRING$ (15,0) ; : ТТ=1:Т 
Y=TY+(TY:> 日 ) : GOTO400 

850 TT=RND( 1 ) * さ ー1 : GOTO400 

860 REM ---------- Atack ! (TEKI) 

870 X2-0:Y2-0: IFOO«OT OR Х-Тхб0Т0520 

880 LINE(TX,TY) - (TX*2,TY*2) ,"B" , 1, BF:LIN 
E (X,Y) – (Х+2,ү+2) "B", 1, BF 

890 Y=TY: X=TX+SGN(X-TX) *3:GETGA (TX-6, Y-2 
)-(TX*6, Y*4) 。GE 

900 IFWZ«»20GOTO920 

910 COLORi1:LOCATE15,JJ:PRINT"SENENEENEEENI" ; 
:LOCATE12,JJ*2 

920 PRINTSTRING$ (14,135) ; : COLOR7 


950 IFFW«X8THENIFRND (1) <. SGOTO1230ELSE147 ° 
2 


940 ON (FW-6)*8*1 БОТО 1150,1080,990,990 
950 IFFWZOTHENFW-QO 

950 IFMZ= さ の THENFIUT@A(X こ 6 ,Ү-2) - X*6, Y*4) , 
GE: WZ-0: GOTOS40 

970 FPUTGA(TX-6,Y-2) -CTX*6, Y*4) ,GE: 00=0: 6 
070840 


1] TOR: MEM. т Alii kick 


990 LOCATEO,Z:FRINT"7U *w2":i:BEEP1:FORJ- 

QTO2: IFX:TXGOTO1Q0:30 

1000 COLOR2:LOCATETX,Y:PRINT" M "ssCOLO 
R7:FRINT"Ge ";YG$;" W-.8g-.";:BEEFQO 

1010 PRINTYG$;" ^.! ~"; :sFORIZOQTOSQO: BEEP I 
MOD2: NEXT 

1020 LOCATETX*3,Y:PRINT"-9-":YG$;"--.- ЫШ 
"YG ” 11 "$33GOTO1060 ` 

1050 LOCATETX-3,Y:PFRINT" € ";:COLORZ:FRI 

NT" "s: COLOR7: REEF O 

1040 РКІМТҮБФ; "Ш.Ш"; YG; " 
I-QTOSQO: BEEF IMOD2: NEXT 

1050 LOCATETX-3,Y:PRINT"*e-"; :LOCATETX-Z 
,Y*1:sPRINT" B "W«-"5YG$;" I M"; 

1060 FORI-QTO60: BEEF IMOD3: МЕХТІ, J: FW=FW- 
3:GO0TO950 

14878; REN >= Drop kick 

1080 LOCATEO,3:PRINTWZ$ (5) ; : IFXCTXGOTO11 
10 


1 277". РОК 


1090 LOCATETX,Y:PRINT" ~  &€-";:COLOR2:LO 
"CATETX 。Y+1sPRINT" A"; 

1100 COLOR7:PRINT"E-B ";YG$;" ⁄ 1 "yy 860 
Т01120 

1110 і ОСАТЕТХ-3,Ү:РКІМТ"-ӨӘ e "$3 YGS$;" E 
=; 


1120 COLOR2:FRINT"FI ";:COLOR7:PRINTYG%;" 
I ` "o. 

1130 FORI-QTO160: BEEFIMODA: NEXT: :PW-PW-6a 

“5070950 

1140 REM ---------- Chork i 


oo _ 


= TK CN S, 
うわ け で . 


チャ な の で , 
で は そう い 


1150 LOCATE の 。 さ = PRTNT "リフ ソフ チョ ー ク "= IFX«TXGO 
TO1180 

1160 LOCATETX,Y:COLOR2:FPRINT" Я"; : COLOR 
7: РКІМТ 9"; 
1170 FRINTYG$;" ШШ ":YG$s;" /111";: А-Т 
X+3: 650701200 

1180 і ОСАТЕТХ-2,Ү: РКІМТ" Ф"; : COLOR2: FRI 
МТ"А "$$: COLOR7 

1190 FRINTYG$;" WM ":iYG$;" III N "s:60-T 
Х-1 

1200 ҒОКІ-1704:ВЕЕРІ:! ОСАТЕА,Ү-1:РКІМТНЕ 
X$ (I); : BEEFO: FORJ-OTOSOQ: NEXTJ, I 

1210 FW-FW-10:GOTO 950 _ 

4 Flying Body atack 
1250 LOCATEO,3:PRINT"272427" $" ^ 472€42" s: : B 
ЕЕР 1: IFX2TXGOTO1:340 
1240 і ОСАТЕХ ,Ү-1:РКІМТ" м "SsLOCATEX, 
Y:s PRINT" өс"; 

1250 COLOR2:PRINT"RI" : : COLOR7: РКІМТ "=" {. 
1260 LOCATEX,Y*1:PRINT" B 7 ";:LOCATEX, 
Y+2 PRINT" 1 “g 

1270 FORI-QTO100: BEEFIMOD4:NEXT:LINE CX, Y 
-1)-(X+5,Y+2) "B", 1 BF 
1280 LOCATEX,Y-2:PRINT"*. 
s COLORZ 

1290 PRINT"R" ; : COLOR7: PRINT "="; : ОСАТЕХ 
;,Ys PRINT"g и"; 

1500 LOCATEX,Y*1:PRINT" B8 ";:LOCATEX,Y-42 
TRINT 494 

1310 ҒОКІ-0Т090: BEEPIMOD3: NEXT: LINE (X, Y— 
2)-(OX*2,Y*2) ,"B",1,BF 

1320 LOCATEX,Ys:sPRINT"* "$;:LOCATEX,Y*1:C 
OLOR2:FRINT"FPi"; 1 

1330 СО ОК7: РКІМТ "Ш" ; : 1 ОСАТЕХ , Ү+2: РКІМТ 
"еш; : GOTO1440 ; 

1540 (ОСАТЕТХ,Ү-1:РКІМТ" „/ 
Х,Ү:РКІМТ" 18"; 

1350 COLORZ: PRINT"PI"; : COLOR7: PRINT" >® ng 
1360 LOCATETX,Y*1:PRINT" ~. B8 ";:LOCATET 
X,Y*2: PRINT" Ext 

1370 FORI-QTO100: BEEFIMOD4: NEXT: LINE (TX, 
Y-1) -OTX485,Y42) "B", 1,BF 

1380 LOCATETX,Y-2: PRINT" ^ "$;s:sLOCATETX, 
Y—1:PRINT"-EI 4 

1590 СО ОК2: РКІМТ "Я" ; : COLOR7: LOCATETX, Y: 
FRINT"*. e"; 

1400 LOCATETX,Y*1:PRINT" BM ":;:LOCATETX,Y 
TRRERINT 6 C3 

1410 FORI-QTO90: REEFIMODZ: NEXT: LINE (TX ,Y 
A= (TX+2; VED S." ,1, BF 
1420 LOCATETX,Y:FPRINT" 
:PRINT"-BI"; 
1430 COLORZ2: РКІМТ "В"; : COLOR7: LOCATETX, Y+ 
21:FRINT"-Be'"; 

1440 FORI-QTO1Q00: BEEFIMODZ2: NEXT 

1450 GETGA(TX-6,Y-2) - CTX*6,Y*4) ,GE: GOTO2 


"PTLOCATEX, 


"$ sLOCATET 


еҙ 8LOCATETX,Y*1 


550 


1460 КЕМ Nec Henking three 


1470 LOCATED, 3: PRINT"3w 7 f»7" )9—-"s s IFTX 


»XGOTO1540 

1480 LOCATETX,Y: COLOR2: PRINT" Pà";:COLOR7 
:PRINT"@ " , 

1490 і ОСАТЕТХ ,Ү+1:РКІМТ" ШШ ";:LOCATETX 
QY*2: PRINT" | xX I"; 

1500 FORI-OTO150:BEEPIMODZ:NEXT:LINE(TX, 
Y)-(CTX*4, Y*2) "B", 1, BF 

1510 LOCATETX,Y-1:FRINT" &^";:LOCATETX,Y 
: COLOR2: PRINT "А" ; | 

1520 COLOR7:PRINT"! "::LOCATETX,Y*1:PRIN 
кы 5 

1530 LOCATETX,Y*2: PRINT".^| ;:60701590 
1540 LOCATEX,Y:PRINT"  9";:COLOR2: PRINT" 
円 "s: COLOR7 j 
1550 LOCATEX,Y*1:PRINT" Ш ЧЕ ";:LOCATEX,Y 
*2:PRINT" 1x | "3 

1560 ЕОКІ=0Т0150: BEEPIMODZ:NEXT: LINE (X, Y 
)-O(*4,Y*2) , "Ш", 1, BF 

1570 LOCATEX , Y-1: PRINT"*"; tLOCATEX, Y:PR 
INT" I"; COLOR2 
1580 РКІМТ "Е" ; : COLOR7: LOCATEX , Y*1: PRINT" 
B "U;:ILOCATEX,Y*2:PRINT" | "3 

1590 FORI-QTO201:BEEP- ‹1М0020=0) : NEXT: LO 
CATE14,8: PRINT"GIVE UP'" 

1600 GOTO 3880 

Drop to rope 

1620 IFX«TXGOTO1780 

1630 LOCATETX,Y:COLOR2:PRINT" А"; : COLOR 
7 

1640 PRINT" @ ";YG$;" ШШ ";YGS$;" ixil 
"s :FORI-OTO99: BEEPIMODZ: NEXT 

1650 LINE(TX 。Y) 一 (TX+2。Y+2) ,"B",1, ВЕ: ОСА 
TEX,Y:FRINT" @/"; 

1660 LOCATEX , Y* 1: PRINT" 
PRINT” 1"; 

1670 саноо LINE(I-1,Y)-(I-1 
Y*2)0 ,"R", 

1680 LOCATE, Y: COLOR2*TK: PRINT" Pi";:COLO 
R7 

1690 PRINT"/"; : BEEFQ: LOCATEI,Y*1:PRINT" 
m"; 


"s sLOCATEX, YFZ 


» 89 


оо 


リス ト 1 闘魂 BASIC リ スト 


1700 LOCATEI,Y*2:PFRINT"." | "3: NEXTI: LOCAT 
E24,Y: COLOR2: PRINT" 円 " 

1710 COLOR7:LOCATE24,Y*1:PFRINT" ШО": ОС 
ATE24,Y*2: PRINT". | "s 

1720 IFX*4»24THENTX-26: 60702700 

1750 FORI-QTO100: BEEFIMOD2: МЕХТІ: ҒОКІ=24 
TOX*SSTEP-1:BEEP1 — — — сы ا‎ 
174@ LINE(I*S,Y)-(I*3,Y*2) ,"B",1:LOCATEI 
Y: PRINT" N"; 

1750 COLURSsFRINT "円 "š: COLOR7: BEEF OQ 

1760 LOCATEI,Y+1:PRINT" 8 ";:LOCATEI,Y«*2 
'sPRINT" p 3" 

1770 NEXTI:GOTO1910 

1780 LOCATEX,Y:FRINT" ® "::COLOR2:FRINT" 
円 ":;:COLOR7 

1790 LOCATEX,Y*1:PRINT" ШШ. "S; YG$s;" | >x | 

"S :FORIZQTO9?9: BEEFIMOD3:NEXT 

1800 LINE(TX,Y) -(TX*2,Y*2) ,"W",1,BF:LOCA 
TEX,Y:sPRINT"*e "; 

1810 LOCATEX,Y+1:PRINT" 8 ":;:LOCATEX,Y42 
s PRINT" | "5 

1820 FORIZX-4TO9STEF-1: REEP1:LINE(-43,Y) 
—-(I*S,Y92) "B" 1 

1820 LOCATEI,Y:PRINT"«"$;  COLOR2: РКІМТ "А 
"$3 s COLOR7 

1840 BEEFO:LOCATEI,Y*1:PRINT'"^HE "; 

1850 LOCATEI,Y*2:PRINT" | «"$:zNEXTIsLOCAT 
E9,Y: COLOR2: PRINT" M "š: COLOR7 

1860 LOCATE9,Y*1:PRINT""W ";:LOCATE9,Y*2 
s PRINT" | S" ІҒХ-4<9ТНЕМТХ-8: 50702700 
1870 FORI-QTO1Q00: BEEPIMOD2: NEXT: FORI=10T 
0Х-3:ВЕЕРІ 

1880 LINE( エ ユー1 。Y) 一 (ユー1 。Y+2) , "M", 1: LOCATEI 
| YsSCOLOR2: PRINT" А"; 

1890 COLOR7:FRINT".^";s:BEEFO 

1900 LOCATEI,Y*1:PRINT" B&-";:LOCATEI,Y*2 
:PRINT". | "s sNEXT 

1910 TX=X+SGN(XーTX ) #3: IFXXTXTHENAX=XELSE 
AXzTX 

1920 LINE(TX,Y) -(TX+2 。Y+2) , "lg", 1, BF: RETU 
RN 

1950. REM. = ニーーーーーーーーー Doble Down 

1940 PUTGA((X-6,Y-2) - CX *6, Y*4) „БЕ: IFX>TXG 
0701966 

1950 і ОСАТЕХ ,Ү+2: РКІМТ "ӨШ"; : COLOR2: РК 
ІМТ "В": : COLOR7: 60701970 

1960 ( ОСАТЕТХ ,Ү+2: СО ОК2: РКІМТ "Я" s: COLOR 
7:PRINT"lE—SBe" ; 

1970 FORI-QTOSQOQ0: NEXT: BEEF1: LOCATEX,Y*1: 
FRINT" @ "; 

1980 LOCATEX,Y*2: IFX2TXTHENFRINT"-B "; Е 
LSEPRINT" ="; ; 

1990 BEEPQ: FORI-QTOZOQZNEXT:LOCATEX, Y: FR 
INTMA$ (0) ; 

2000 ҒОКІ=0Тт0500: IF INF (8) < >259ТНЕММЕХТІ: 
GOTOS20 

2010 REM ---------- Ға11 

2020 (ІМЕ(Х,Ү)-(Х%2,Ү%2),"ШЕ",1,ВҒ:ІРКХ>ТХ 
50702050 

2030 LOCATETX-1,Y-1:PRINT"  -"s:LOCATETX 
ー1 。Yi PRINT"-He"; 

2040 LOCATETX-1,Y-*1:FRINT" -.";:650Т702070 
2050 LOCATETX*1,Y-1:PRINT"*. "s$:LOCATETX 
*1,Y:PRINT"Gel-"; 

2060 LOCATETX*1,Y*1:PRINT".^ "j 

2070 FORI-QTOB8Q0: REEFIMODA: NEXT 

2080 PUTGaG(X-6,Y-2) -CX*6,Y*1) ,GE: IFX:TXG 
0702110 

22090 LOCATETX,Y:PRINT" ~ "; 

2100 і ОСАТЕТХ,Ү+1:РКІМТ "80 "; : 60702150 
2110 LUCATETX+1 ,Ү-1:РКІМТ" "s :LOCATETX 
3 YIPRINT' S, "e 

2120 і ОСАТЕТХ ,Ү+1:РКІМТ" «Ш "; 

2130 FORI-QTO100: BEEPIMOD2: NEXT: IFX2TXTH 
ENA=TX+3ELSEA=X +3 

2140 FORI-ZOTO10STEF-1: IFI¥2=HFORHF >1 SGO 
TO2170 

2150 LOCATEA,Y-1:FRINT (40-1) *10; : BEEPIMO 
D10:FORJ-QTOSO: NEXTJ,I 

2160 GOTO3740 

2170 ҒОКІ-0Т0200:МЕХТ:ВЕЕРІ:ІРКХ>ТХООТО22 
10 

2180 LOCATETX,Y-1SÓPRINT" ~ ";sLOCATETX, 
Y: PRINT" m; 

2190 LOCATETX,Y*1:PRINT" B  e";:LOCATETX 
y Y+2:PRINT". "5 

2200 COLOR2:FRINT"  ";:0650Т702240 

2210 LOCATETX-2,Y-1:PRINT" ^ "gsLOCATET 
Х-2,Ү:РКІМТ" 8 " 

2220 LOCATETX-2,Y*1:FRINT"e 8 "; 

2230 LOCATETX-2,Y*2: COLOR2:PRINT" Ғғ: С 
OLOR7:PRINT" *"; 

2240 COLOR7:FORI-ZQTO300: BEEF IMOD6: NEXT 
2250 FPUTGA((X-6,Y-2) - CX*6,Y*4) ,GE: IFX>TXG 
"0Т02290 

2260 LOCATE TX,Y-*1:PRINT" 
: LOCATE TX*4,Y:PRINT"B" 
2270 COLOR7:LOCATETX,Y*2: РКІМТ "38"; : COLO 
R2: РКІМТ "Я"; : COLOR7 

2280 FRINT" ORT"; : FORI-QTOSQOQ0: NEXT: GOTO2: 
18 зы 

2290 LOCATETX-3,Y*2: PRINT"—lie" 』 : COLOR2:F 
КІМТ "Я"; : COLOR7 

2300 РКІМТ"Е-";:ҒОКІ-070500:МЕХТ 

2310 PUTGA(X-6,Y-2) - CX *6, Y*4) , GE: X=TX+SG 
N(TX-X ) «3: GOTOBz0 

2320 REM ---------- Over 

2250 FORI-3OTO10STEF-1:LOCATEX, Y-1: PRINT 
(40-1) ¥10: BEEPIMOD1O 


Оо 


"$ :COLOR1 


私 は PC-6001mkII を 持っ て いる 者 で す . N。。 モ ー ド の と き 。, 
イン タプ リタ で 使用 および 管理 され な い ぃ 領域 で す .」 っ て 書い て ある の に . 
t. モニ タ が 超 動 する よ . た だ た だし, 777 を 押 る な いと , エヘヘ へ, 


2340 FORJ-QTOSO:NEXTJ,I: BEEF1:FORI-QTO6Q 
Q: NEXT: BEEFO: GOTO3880 

2350 REM ---------- TEKI Down 

2360 РОТЕА (Х-6,Ү-2) - (X*6,Y*4) , GEzLOCATEX 
Y: РКІМТМАФ (C2) ; 

2570 LOCATETX,Y*2: РКІМТ "58"; : COLOR2: PRIN 
T "円 "si COLOR7: GOTO1 990 

2580 REM ---------- German sooplecs 

2390 BEEF1:IFX»TXGOTO2450 

2400 LOCATEX,Y-1:COLORZ2:PRINT" Pi"; : COLOR 
7:PRINT"  ";:LOCATEX,Y:FRINT" oR"; 

2410 LOCATEX,Y*1:PRINT" ШО ";:LOCATEX,Y-^ 
PRINS Z 

2420 ҒОКІ-0Т0150: BEEPIMOD3: NEXT: LOCATEX , 
Y-1:PRINT" "g 

2430 BEEP1:LOCATEX-1,Y:FRINT" ~. 
ATEX-1,Y*1:PRINT" ah"; 

2440 LOCATEX-1,Y*2: COLOR2: РКІМТ "Я" ; : COLO 
R7:PRINT"F&g |"::0zX*2:GOTO2500 

2450 LOCATEX,Y-1:COLOR2:PRINT" M "::COL 
OR7: LOCATEX, Y:PRINT"-We "; 

2460 LOCATEX,Y-*1:PRINT" "B ":i:LOCATEX,Y-^ 
ZUPRINTI үү 

2470 FORI-OTO150: BEEPIMOD3: NEXT: LOCATEX, 
Y-1: PRINT" Pg 

2480 BEEF1:LOCATEX,Y:PRINT" 
EX,Y*1:PRINT" Wa "; 

2490 LOCATEX,Y-*2:FRINT"!| ФҸ"; : СО ОК2: РКІ 
NT"Pi"; : COLOR7: A=TX+3 

2500 TX=X+SGN(XーTX ) *3: FORI-OTO160: EEEF' IM 
004: NEXT: IFHP >SG6OTO1 940 

2510 60702140 

2520 REM ---------- Figear four reg rock 
2550 FORI-QTOA: IFX«TXGOTO2570 

2540 LOCATETX,Y*1: COLOR2: PRINT" А"; : COLO 
R7:PRINT" ® ";YG$;" EH." ; 

2550 FORJ-QTO1Q00: BEEFIMOD4: NEXT: LOCATETX 
.Ү+1: РКІМТ "<"; 

2560 LUCATETX ,Ү+2:РКІМТ" “;:650702600 
2570 LOCATEX,Y*1:PRINT" ® н"; : СО 062: РКІ 
NT "В "g sCOLOR7 

2580 PRINTYG$; ".SL-N-."::FORJ-OTO1Q00:BEEF 
IMOD4: NEXT: LOCATEX*S , Y*1: РКІМТ" >"; 

2590 LOCATEX*S,Y*2:PRINT" "; 

2600 FORJ-OTO100:BEEFJMOD2: NEXTJ : HP-HF—1 
: IFHF«SGOTO2680ELSENEXT 

2610 PUTGA(((X-6,Y-2) - CX*6,Y*4) „СЕ: WZ-30:G 
0701150 

2620 REM ---------- MANJI gatame 

2630 FORI-1TO6:LOCATEAX,Y-1:PRINT" e "; 
:LOCATEAX , Ys: PRINT"« IE"; 

2640 COLOR2: LOCATEAX , Y*1: РКІМТ "Я" ; : COLOR 
7:FRINT"B."; ` 

2650 PRINTCHR$(239- (IMO0D2) *177) 3 s LOCATEA 
X,Y*2:PRINT" | 1 "5 

2660 FORJ-OTO100: BEEFJMOD2: NEXT: HP-HP-2: 
IFHPZSGOTO2680ELSENEXT 

2670 PUTGA(X-6,Y-2) - (X*6,Y*4) GE: WZ-30:G 
0701150 

2680 LOCATE15,8:PRINT"GIVE ШР! "; : BUT ロミ 74 
a 


"s :LOC 


^ "S LOCAT 


2690 REM ---------- Jougai loop 

2700 LINE(0,5)—(38,24) ,CHR$ (Ø) , BF: GOSUBS 
610 

2710 Ј0=0: ІҒХ<ФОКХ>25ТНЕМ00-1:1 ОСАТЕ15,1 
6: РКІМТ" ФШ-";:МТ-15:РИЫ-РЫ-В 

2720 ІҒТХ<9ОКТХ>25ТНЕМ20-470%2:1 ОСАТЕ22,1 
6: РКІМТ "889"; : ET=15: НР=НР-8 

2730 IFTX«9O0RX«z9THENJX-Z9ELSEJX225 

2740 Х=15:ТХ=22 

2750 FORT-OTO100: LOCATE17,6: FRINTT€*S:1Q0- 
INP (Q) 

2760 IFMTTHENMT-zMT-1:GOTO2860 

2770 IFTMOD8-QOTHENFUW-FPW- (PW 30) : НР=НР+1 : 
GUSUIE さ 2 の 

2780 X17(I02239ANDX-154) - (I0-1910NDX*1«3 
Ø) 


.2790 IFINF (1) =254ANDMT=OAND (JO=10RJ0=3)G 


0702950 

2800 IFJO« »260T028:0 

2810 IFIQO-251THENLOCATEX«*1, 11: PRINTCHR$( 
Q):JO-JO*1:GOTO2860 

2820 LOCATEX*1,11:PRINTCHR$ (0) : X-X*X11:LO 
CATEX*1,11:PRINT"&e";:GOTO2860 

2820 IFABS(X-TX) «4ANDJO-3ANDET-OANDMT-QG 
OTO3010 

2840 LINE(X,15) - (X*2,16) ,"B" , B:LINE(X, 14 
)-(X+2,14) ,"—" 

2850 Х=Х+Х1:1 ОСАТЕХ, 14: РКІМТМАФ ( TMOD2) ; 
2850 TT--(TMOD20« 17+ (57<5) *5-8T) : IFETTHE 
МЕТ-ЕТ-1:650702920 

2870 X228GN(X-TX) *- (RND (1) > 4) *ー(MT= の ) 
2880 IFABS(X-TX) «4ANDJO-SANDET-OANDMT-QG 
OTO3010 

2890 IFJO-1THENLOCATETX,11: COLOR2: PRINT" 
A"; : COLOR7: GOTO2930 

2900 ІҒТ>8060702970 

2910 LINE(TX,15) 一 (TX+2。16) , "B" ,B:L INE (TX 
,14) -CTX*2,14) ,"—"1 TX- TX*X2 

2920 LOCATETX,14:PRINTRB$ (ТТ) : COLOR2: LOC 
ATETX*1,14: PRINT"Ri"; 

2930 LOCATE17,0:PRINTRIGHT$(TIME$,5);:IF 
ТІМЕФ>"00:02:00"5070550 

2940 COLOR7:NEXT Т:650Т702720 

2950 JO-JO-1:LINE(X,14) - (X*2,14) ,"—":L IN 
Е(Х,15) - (X*2,16) ,"B",B 

29560 IFJOGOTO280QELSE2990 

2970 JO-JO-2:LINE(TX,14) -(TX*2,14) ,"—":L 
INE(TX,15) -CTX*2,16) ,"B",E 


/ 


2980 IFJOGOTO289Q9 
2990 60508190: Ј0=0: X2JX: TX2JX: Yz18: TY-8: 


---------- Jougai Atack! 
5010 Х1=0:Ү1=0: IFTTGOTO3A480 
3020 БЕЕРІ:ІҒХ>ТХ50ОТО35040 
3030 LOCATEX,14:PRINT" ® ";:COLOR2:FRINT 
"А "$: COLOR7: GOTO30SQ 
3040 LOCATETX,14: COLOR2: PRINT" А ";:COLO 
R7:sFRINT" е”; 
3050 PRINTYG$;" ЕСЕ ":YG$;" | ^ | "5 
5060 BEEPO:WZ-1: COLOR7: FORI-KG*3TOOSTEP- 
1: BEEF 1: EEEF の 
5070 LOCATES8,S:PRINT"ATACK'"; IXKG: WZ-WZ- 
(OINKEY$-" "ANDWZ< 15) : COLOR1 
5080 LOCATE17,S5:PRINTSTRING$ (10,0) ; : COLO 
К7: _ОСАТЕ17 5: РКІМТЈИФ (WZ); 
5090 IFINF (8) <>259ТНЕММЕХТ: 650702480 
3100 LOCATES8,5:PRINTSTRING$(19,Q) 
3110 COLOR7:LOCATEQO , 3: PRINTJW$ (WZ); 
3120 FW-PW-*(WZ*2)*((PW-WZ*25»1):81-2(WZ*5)* 
2: 60508510 
3130 ON(WZ-1)*5*1G0T0:2180,:270,3360 
3140 LOCATEQO,3:PRINTSTRING$(10,0); 
5150 LINE(4,15)-(33,16) ,"B",E:LINE(5,14) 
-(324,14) ,"—" 
3160 LOCATETX,16: PRINT"-CWEPI" ; :LOCATEX,14: 
PRINTMA$(2):GOTO2940 
3178 REM ニーーーー ニ ーー デー Nackl part 
3180 FORI-QTO3:IFX^TXGOTO3220 
3190 BEEPF1:LOCATEX,14:PRINT" &e- 円 ":YG$; 
"ЕЗ "YGS; "7 | Ú N"; 
3200 ВЕЕРҒ@: :: : ВЕЕҒ 1: ҒОКЈ=0Т0100: NEXT J 
5210 ВЕЕР 1:1 ОСАТЕХ, 14:РКІМТ" e 円 ";ҮБФ; 
"Ш-Ш ";:G0T03250 
3220 ВЕЕР 1:1 ОСАТЕТХ, 14: РКІМТ" А “е ";YG$ 
3" КЕ "sYG$$g" x "5 
3230 BEEPQ::::BEEF1:FORJ-OTO100: NEXTJ: BE 
ЕР@ 
5240 BEEF1:LOCATETX,14:FRINT" А ө ";YG$ 
g m.m "a 
3250 ВЕЕР 1: ҒОКЈ=0Т70100: МЕХТЈ : BEEFO: NEXT 1 
‘З ЕТ=5: 60705140 
5260 REM ---------- Неасі Бас 
3270 ҒОКІ-0Т03:ІҒХ>ТХС5ОТО2210 
3280 LOCATEX,14:PRINT" €^ ";v6$;" Ж: >88 
"a9NOSE'"U „ү : 
3290 FORJ-QTO100: BEEPJMOD2: NEXT 
ささ の の LOCATEX,14:PRINT" ФА ";vG$;" m m 
"$ YG$5 " | x | "5:GOTOSS4Q 
$310 LOCATETX,14:PRINT" ҒӘ ";YG$;" Ш> 
B ":YGS$;" | |"; 
3320 FORJ-OüTO100:BEEFJMOD2: NEXT 
$330 LOCATETX,14:PRINT" Шс  ";vG$;" M E 
"+ YGS; " 15» 4 j 
3340 FORJ-OTO1Q00: BEEPFJMOD2: NEXTJ, I:ET-1Q 
: GOTO3140 
3350 КЕМ ---------- Techuu koogeki 
5560 IFX»TXGOTO34Q00 
3370 FORIZX*1TO28:LOCATEI,14:PRINT" eA 
3380 BEEP1:LOCATEI,15:PRINT" W N-"::LOC 
ATEI,16s:sPRINT" иті У"; 
5590 ВЕЕР@:1ІМЕ (1-1,15) – (1-1,16) ,"B":LOC 
ATEI-1,14: PRINT"—"; : МЕХТ: GOTOZ430 
3400 FORI-TX-1TOSSTEF-1:LOCATEI,14:PRINT 
" Pr "; 
5410 BEEP1:LOCATEI,15:PRINT"-HE B  ";:LOC 
ATEI,16:sPRINT"^ 41 ` "j 
3420 BEEFO:LINE(I*6,15)-(I*6,16) , "B":LOC 
ATEI*6,14:PRINT"—"$; :NEXT 
3430 BEEPF1:FORJ-QOTO200:NEXT: BEEPQ: IFX >TX 
GOTO3S450 
3440 Х=1:ТХ=1+%:6О0ТО545@ 
5450 ТХ=1+1:Х=1+4 
3460 ET= さ 6』 LUCATETX 。 16』 PRINT" WF!" ; : GOTOZ 
140 à 
3470 REM ---------- Techuu koogeki (TEKI 
) 
3480 IFTX»XGOTO3520 
5490 FORI-TX*1TO28:LOCATEI,14:PRINT" PL 
e"; 
3500 BEEPi1:LOCATEI,15:PRINT" W N—";:LOC 
ATEI LOGIPRINT” ИТІМ"; 
5510 BEEFO:LINE(CI-1,15)-(I-1,16) ,"B":LOC 
ATEI-1,14:PRINT"—"::NEXT: GOTO3550 
5520 FORI-X-1TOSSTEP-1:LOCATEI,14:PRINT" 
em 9 
3530 BEEFi1:LOCATEI,15:PRINT"-HE m ";:LOC 
ATEI,16:PRINT". 11"; 
5540 BEEFO:LINE(I*6,15)-(I*6,16) , "B":LOC 
ATEI*6,14: PRINT"—"$:NEXT 
2550 BEEF1:FORJ-QTO200: NEXT: ВЕЕРӘ: TFTX>X 
50705570 ? 
5560 TX-2I-6:X-I-«3:GOTO3580 
5570 Х=1+1:ТХ=1+1@ 
5580 LINE(4,15)-(33,16) ,"B",B:LINE (5,14) 
-(52,14),"--" 
5590 MT-36:LOCATEX,16:PRINT"Gei-" ; : GOTO29 
40 
5600 REM ---------- Jougai print sub 
3610 COLOR7:LINE(8,7)-(8,9) ,"BW",2:LINE(2 
9,729299), "8,1 
3620 LINE(4,12) -(4,14) ,"W",2:L INE (32,12) 
-(33,14) ,"B",1 
さ 6 さ の FORI-7TO9:LINE(9,1)—-(28,1) ,"—": NEXT 
3640 FORIZ12TO14:LINE(5,1)—(22,1) ,"—":NE 
XTsLINE (7,8)—(4,11) , "7" 
5650 ІМЕ (7,10) – (6,11) 


"2": LINE (50,8) - CS 


どう し て ユー ザー エリ ア A が 使え な いん で し ょ うか . マニ ュ ア ル に は 「BASIC 
PS.N。。 モ ー ド で OUT &HFO, &H11: EXEC &HZSC3 と する 


x S aput y 


UM i 
Ес So 2 


e 
ҚА, 
72 


3,11), "N"sLINE(Z0,10)-(31, 415, 
3660 LINE(4,15)-(33,16) ,"B",B: FORI-QTO2: 
LINE(4-I,17*1) -(32*I,17*1) "B" ,6 

5670 NEXT:LINE(2,17)-(1,19) ," 4" , Gs LINE (3 
4,17) — (36,19) ,"&",6 

3680 LINE(1,20)-(26,20) ,"":LINE(Q,21)-( 
37,23) ,"B", 1, BF 

3690 COLOR1:LOCATEO,21:PRINT" 4"; :LOCATEZ 
7,21: PRINT"A" s: COLOR7 

3700 LOCATEQO,Z:PRINTSTRING$ (18,0) ; : RETUR 
N 
2710 
3720 


" " 
N 


REM Game clear 
LOCATE14,6:PRINT"RING QUT''" 

3730 ІҒ10<>260Т05880 

3740 ТІФ%-ТІМЕ%:БЕЕРІ:ҒОКІ-0Т0600: NEXT: ВЕ 
ЕР@: FORI-QTO1000: NEXT 

3750 ҒОКІ-0Т0250: BEEFIMODSO: NEXT: LOCATE 1 
7,0: FRINTRIGHT$(TI$,5); 

3760 FORI-QOTO2O000: NEXT: IFJO«X >2THENPUT@A ( 
X-6,Y-2) - CX *6,Y*4) ,GE 

3770 LOCATE17,7:PRINT"TIME"; : COLOR2: LOCA 
TE13,80: PRINT" MIN. . SEC. "4 

5780 COLOR7:FORI-OTO2000: NEXT: ОСАТЕ 15,8 
:РКІМТМІр%(71%,4,2); 

3790 LOCATE19,8:PRINTRIGHT$(TI$,2);:COLO 
R2:LOCATE13,12 

3800 РКІМТ "ВОМ"; : COLOR7: ҒОКІ =0702000: М 
EXT 

5810 A-(VAL(MID$(TIS$,4,2))*6Q0*VAL (RIGHTS 
(TI$,2))0)05*10 

3820 А-(12-4)%10:Аа-Аж-(А>0) : FRINTUSING'# 
###O00'"; A; :FORIZ-OTOSOQQ0: NEXT 

5850 FORI-1TOA:BEEF1:81-21: GOSURZ 10: ВЕЕРО 
:LOCATE18,12: PRINTUSING"4S 400" ; АІ 

5840 NEXT: COLOR2: ОСАТЕ14,15:РКІМТ"МЕХТ 
GAME" ; : COLOR7 

3850 FORI-QTOSOQ00: NEXT: OT-OT-2: IFOT< 8THE 
МОТ = 日 : に ドロ = に ロー ュ IFKG« 6ТНЕМКб=6 

3860 RO=RO+1: GOSUR1 90: 5070560 


ーーーー Game over 


(KEXA) 


CA ОБ ЛЕЛЕ ГАМ “хе Gi SW Sy 
di SPSS 3€ ж 4%? зра ЕРТЕЦ 


3880 ҒОКІ=0702000: NEXT: LINE (9,8) – (27,20) 
SUEC.I.BF 

3890 FORI-QTO250: BEEPIMODSQ: NEXT: LOCATE 1 
5,12:PRINT"YOU LOST!" 

3900 FORI-QTOZOQQ:NEXT: LOCATE14,12: PRINT 
"GAME OVER"; 

3910 LOCATE10,14:PRINTUSING"YOUR SCORE # 
####@0";5:1Е5>НТНЕМН=5 

3920 LOCATE14,8:PRINT"TRY AGAIN!":COLOR2 
:LOCATE12,16:PRINT"HIT RETURN KEY" 

3958 FORJ-0TO2000: IF INKEYS« >СНАФ (13) THEN 
NEXT 

3940 GOTO160Q 
2960 LINE (9,8) - (27,20) , "B", 1, BF:LOCATE12 
,24: COLOR2 

3970 PRINT"HIT RETURN KEY"; :аФ=СНКФ (31) + 
STRINGS (19,29) 


3980 LOCATE9,8:PRINT'"ENENN umama m 
"A$; 

2990 FRINT'E шш NH | "A$; 
4 の の の PRINT"ENENE mama | Mt 
4010 PRINT"EH NN E юш EH B 8; А5; 
4020 РБІМТ"ЕЕНЫ mamam шшш"; а; 
40:0 FRINT"m _ ~- ш ER ú m Ш"; A$; 


4@4@ 
4@5@ 
4060 


FRINT"E.— -+E B ЬШ; 05; 
FRINT"N'— | G ma, "A$; 
РКІМТ "Ш. — іш p 4 "AG; 

4070 FRINT"N — ч в Р m l'AS; 

4080 PRINT "I B АР WEH"; A$; STRIN 
G$ (19,0) : A-USR2 (2324) : COLOR7 

4090 FORI-QTOS90: IF INKEY$« »CHR$ (13) THENN 
EXTELSE 1 7g 

4100 LINE(9,8)-(27,20) , "B", 1, BF 

4110 LOCATE14,10: PRINTMA$ (0) :LOCATE17,11 
:PRINT"YOU" 

4120 COLORA:LOCATE22,10: PRINT"S8":LOCATE2 
1,11: PRINT"4«46" 

4150 LOCATE22,12: PRINT"2": COLOR7:LOCATE1 
2,14: PRINT"SFPACE-77" / セー タフ" 


9i0 


リリ スト 1 闘魂 BASIC リ スト 


4140 LOCATE11,15:FRINT"GRAFH-ATACK. 。 フォ ー ル " 
4150 LOCATE14,17:FRINTRE$ (0) : COLOR2: LOCA 
ТЕ15,17:РКІМТ"РІ"; 

4160 COLOR7:LOCATE18,18: PRINT"9" - 7? O-"; 
4170 FORI-QTOS800: IFINKEY$« »CHR$ (1:3) THENN 
ЕХТЕІ 6Е170 

4180 LINE(9,8)—(27,200 ,"B", 1, EF: LOCATE14 
| | 10: PRINT"-09"*/ ニシ ジュ ルイ ー" 

4190 FORIZ1TO12:A-&HE718* (1-1) *B*2*PEEK ( 
&HE6FF+1 ) 

4200 POKE&HDFFE,FEEK (A) s PORKE&HDFFF ,FEEK ( 
А+1) 

4210 COLOR1:LOCATE14,17:FRINTSTRING$(13, 
135) ; : COLOR7 

4220 COLOR7:LOCATE14,17:FRINTWZ$ CI) 3 : A-P 
EEK (%HE6FF *I) 

4230 IFFEEE CXHE778* (1-1) *2-1*PEEK CKkHEGFF 
+1) ) THENAZUSR1 (4108) ELSEA-USR (4108) 

4240 FORJ-OTO200: IF INEEY$« *CHR$ (13) THENN 
EXTJELSE170 

4250 LINE(16,12) - (21,15) , "WB", 1,BF:NEXTI 

4260 LOCATE17, 13: PRINT"/XD"; 

4270 FORI-QTQBQQ: IF INKEY$« »CHR$ (12) THENN 
EXTI: GOTOS960ELSE170 


4290 DATA^"h"nw7, 
4226.0-U257" VY wh 

аза DATAILDZ"-4T'"U,n*-(Wbh" ライ リド —,01222 ラリ ア ゅ 
h, レー ソバ "スズ クー 。 メー フ * レッ クス 

4310 DATAN wy 7t" Oy 7° \" w72" リー カー 。 ミ パャ ー マッ スー フ 
> レッ クス 。 アウ ヨン ノシ ^ リマ フシ トカ タメ 

4320 DATATw7Ww N° -—h,^wh"n"wh",7»*31-23-7"'t 

4550 DATA1,5,1,53,14,2,14.,2,.24,2,2,.24,24,5,64.5 
45,6,5,6,5,6,2,6,2,7,6, а 

4340 REM " TOOKON" (No. 39) 

4350 REM (C) (F) К.К SOFT MCMLXXXIV 


4360 REM Supervisor as КОВ. КОҮАМА 
4370 REM  Programer as FGE.kKOYANA 


4380 REM Art derector as. SQ v Ba" 59 1.849575) 


4390 REM Base тое ру Mig 


スト ッ ヒ 5 フウ 。 ト "ロッ フッ fw 2 8” y" 


— TI O リス トク NIE マシ ン 本 リス Б ны 


リス ト 2 闘 殊 マシ ン 語 リ スト 


D жала» m de. шы d Y \ AU AU AU EAU AU AU AU AU AU AU AU EAS 
2 x` A D 
ë г š Q : PRL 
se AA | PIII 
ы РУ P. Ps 


人 @ 清 水 = 
SHARP の 新 製品 PC-1246 を 友人 が 買っ PC-1245 系 と 同じ で す が , 一 応 図 2 に 示 | BF の CK00 と CK01 と いう の が わか り ま せ 
ROT, 借り て 解析 し て み ま し た . し ます . А, ダイ レク ト で 実行 する と CK00 は チェ 
| © 中 間 コ ー ド ッ ク 模 様 に な っ て , 何 か キ ー を 押す と 反転 
Ф’ あま り 変 化 は な いよ う で す が , &BEL& | LCAMGEL + UI: UL, CKO1 は 実行 する と 
# A L 1 + > Z, SC61720D03 の 中 に 表 1 固定 変数 格納 番地 ロー ド の し とき に 出る ※ ネ マー ク が 出 て し まい 
ROM, RAM, CPU が 入っ て し まっ て い 変数 名 アド レ 変数 名 まし た だ . 両方 と も 電源 を OFF に する と な 
>, だ か ら , 今 ま で 解析 る れ た 内 部 ROM E9—EF i0 iT», これ は いっ た だ い 何 な の で し ょ 
(&0000 — &1FFF) が 使え な い . F 0 一 F 7 FEDE SKARE OX T SUL S 
OLEJ- v, Z | VHC 表 2 に コー ド 表 を 示し ます . 
この 機械 は CALL が 使え を ない の で 06-106 あと で わか っ た こと で , パス ワー ド の 格 
PEEK で 読め る 和男 囲 で し か わか ら な い の 110—117 納 場所 と パスワード の スイ ッ チ 番地 を 表 3 
. が 残念 で す ( 図 1). Pratis に 示し ます . まな だ 中間 ュ コード の &70 は な ぜ 
@ 固 定 変数 к | | か 凌 走 し ます の で , 注意 し て くだ さい . 
&0080— &014F(- 8 バイ ト 単 位 で 格納 さる 130—137 из. <* ス ワー ド 
れ ま す ( 表 1). D 13 8 一 13F アド レス 
@⑳ プ ログ ラム 格納 方 法 OTE &02D9—&02DF 
M1 メモ リ ・ マ ッ プ dct os &002B の 3 ビッ ト 目 
表 2 中 間 コ ー ド 表 


0 | 2 D E 


5 e | e oT Te fen) ~T ro Tsm faune] e | = 
| | | |) | 1 [а [а [aes Ano |sreP| cos New enr РОН] ~ | 
| |-| |» | 2 |B | R [аве > = men TAN Mew mer LET ~ | 
EREBEHERESESERC OE. 12173770 EB 
| |」| |= арт as <> | ~ facs joonte eno] ~ | 

саз [ABS | OR |WAT|ATN| ~ (CLEAR |NEXT 

EE. NOT |_~ |ЕХР SAVE] ~ |5708 ~ | 

+ DE sar | ~ | in [полю ~ |eord — 

EN LoG MR! ~ sl ~ 

EE 

“р s ФД 

| [t| &|- pans ичи ~ 

L [m + [- [жез ~ oes kusr| os [中 — 

[LT [w | ~ [abe esl ~ pus ғ | ~ |н ~ | 

|= | N | дс mos | ~ |RND|cKmPokE ти ~ | ~ 

| | |o | ~ |rEN| ~ ррмреек|ско (ағарар ~ | 847 


1 
配列 変数 


л 


BET 
HETS 
USTA 

|: =. 
КЕ 
プロ グラ ム 格 納 方 法 ЖАЙЫ 
TE 

DE 

E- 

E. 

= 


а 


( 見 まし た か 2?2 2/28 の 「 ザ ・ ベ スト テン 」. TOMCAT が 歌っ て いる セッ ト に は , あの 「 プ ラズ マラ イン 」 が 写る され て いま し だ ね . どう や ら 

QA 早送り に し て あっ だ た よう で す が . あれ は 非常 に 面白 か っ た. と ん ね る ず が 出 て いた か ら 「 一 気 /」 は 最高 で す . P.S. お か わり シス ター ズ 
メン ザー イ ノ ; 

72 (レッ ド シ ョ ル ダ ー) 


>, „Е (Ns-BASIC* — F) 


LS HOPiO02z7—A 
РС-ВОО1тКП 


ge OBS ООГАН АНИНА ДОНОРЫН СОРОСА NE OUS инна алан EE dade ener ic tA idee vilior Erde plein lent. 
7n—27 


上 回 回 回 EEEE 
cocco EEEEEE 


ауа SEET EEE 
ЕЕЕ ЕЕЕ Ef 


Ela CIETRLE] Е 


LEFT ТІНЕ 


ある 日 , あな た は 倉庫 と も アバ パー ト と も 判 


断 の つか な い 所 へ 入っ て き て し まい まし た . 


そこ は ,。 エレ ベー タ が 上 下 し , エス カレ ー 


タ も あり ます . BROKEN で ある あな た は , 


な ん と か , ШОТЫ, ドア を 破壊 し 
て 数 ある 部 屋 か ら 人 金庫 を 盗み 出し て くだ さ 
Vv. 


B7n7724-477zz»*—a- 


マシ ン 語 AC00~DF3F 
スタ ー ト СА00 


キャ ラク タ が 豊富 で な か な か 楽し い 
の で す が , 毎回 の 画面 に あま り 変 化 
が な い の は 残念 で す . 


*,9.9 
“4244 117294: 


マシ ン 語 で す 。 ひだ すら モー ニタ 
アドレス は AC 


オォ オール ・* 
か ら 打 ち 込 ん で くだ る さい. 
00H —DF3FH-c З. 

入力 し 終わ っ た だ た ら , PiO85 年 2] 
チェ ッ ク サ ム ・ プ ログラム な ど で チ ェ ッ ク 
サム を 確認 し , 間違い が な けれ ば 念 の だ め 


テー ブ に セー ブ し ます . 
実行 は モニ タ か ら @CAOO と し て <〈 だ る 


bei iaa は [4||6| の キー で 左右 に 動 

, |]| の キー で 止ま り ま す . 階 を 上 下す 

る た め に は エス カレ ー タ の 所 へ 行っ て |8| 
|「2| の キー を 押す か (エス カレ ー タ な の で 


初め っ か ら GAI を 出し て し まつ た ァ 


階 昇降 中 に 止ま る こと は で きま せん ), エレ 
ベー タ の 乗降 口 に 立っ て 待っ て いて くだ る 
Vv. 

敵 を 倒す た め に は , [SPACE| キ ー に よっ 
て 「 爆 弾 」 を 出し て くだ る きい. 一 定 の 時 間 
で 爆発 し ます . 

部 屋 は 爆弾 に よっ て 開け る こと が で きま 
3. 

次 に 各 キ ャ ラク タ に つい て 説明 し ます . 
BROKEN… あ た だ の 分 身 で す . 生死 は あな 
だ た の 指 き ば き に か か っ て いま す . 

HATI( は ち )… 敵 で BROKEN を し つこ く 追 
いか け て きま す . 


MUDY( 一 つ 目 )… 敵 で 50% の 確率 で 追い 


か ね け て きま す 。 

KURARA( く ら げ )… 敵 で RANDAM に 動 
いて いま す 。 

BANK… こ れ を 取る と 次 の ROUND へ 行け 


ます が , KEY が な いと 取る こと が で きま せ 


st l. ケー クッ エア 


容 HUM MR 


| ハイ ・ ス コア 
1 А27 
EE 
敵 メイ ン ・ ク ロッ ク 
| タイ ム (X 座 標 ) 
[792.797 
"PLUSI" 875 7 
| | ルー ム ・ ワ ー ク 
б | フル ー ツ ・ デ ー タ ・ ア ドレ ス 
| フル ー ツ ・ ス コア 
DFC | KEY 所 有 フ ラグ 
FD | エス カレ ー タ ・ デ ー タ ・ ア ドレ ス 
F | BROKEN の 数 
| BROKEN Y, X 座 標 
BROKEN 方 向 
| | BROKEN エ レベ ー タ 乗車 フラ グ 
) | BROKEN エ スカ レー タ 乗 車 フ ラグ 
| BROKEN 死 フ ラグ 
爆弾 出現 カウ ンタ ・ フ ラグ 
| | 爆弾 Y, X 座 標 
(|| エレ ベー タ Y., X 座 標 
0D | エレ ベー タ ・ ス トッ プ ・ カ ウン タ 
QE | エレ ベー タ ・ ア ッ プ / ダ ウン ・ フ ラグ 
|| HATI 7-2 
|| MUDY ワー ク 
KURARA ワー ク 
敵 ミ サイ ル ワー ク 
| | GAI 
| DAN 
| Pio 
| 敵 ミ サイ ル 発 生 フ ラグ 
[| ワー ク 


со 
х س ت‎ кюю ب دم —— — — نت‎ кю دہ دم ت‎ ә ت‎ — кю — — دہ دہ‎ 
N 


KEY… か ' ぎ で す . 

DAN… 部 屋 か ら 飛 び 出 し て きま す . 毎月 , 
毎月 あの よう な こと ば か り 書 いて いる 
DAN な の で , ж, 味方 の 区 別 な く 《 頭 突き 
を し ます . 倒す こと が で き な い の で 逃げ る 


し か あり ませ ん 。 

GAI… 強 敵 で す . 部 屋 か ら 出 て き て その 階 
2416 12 b 367220 し ます 。 

BLACK::: 7 —2@ BQ X 572 t OC, 2 


IALA ЕССЕ ЕТТ. 
電球 … 空 き 部 屋 で す . 

а E Ha E HEEE Ш 
う 文 字 が 出 て くる こと が あり ます が , 順番 
に 取る と BROKEN が 1 人 増え ます . まだ 
205, 60 мал 1 人 増え ます . 


ゲー ム ・ プ ブロ グラ ЕСЕН» СО 
H ま で で , >=. 2 u 2' 2. p: CA00H ~ 
CF6BH, 文字 デー タダ , キャ ラク タダ タ の グラ 
フィ ッ ク ・ デ ー タ が D000HーDF3FH ま で 
ん た てい ま 寺 、 


表 2 ido ad 


| BROKEN の 初期 数 


| DAN が BROKEN に 
| 当たっ て も 死な な い 
英 ミ サイ ル 発 生 頻 度 


ATIF 59 
つて で る 


73 


pio 


スコ ア の 値 が 大 きい の に お 気付 き で し ょ まだ まだ 私 も 未熟 者 で プロ グラ ム を 作 最後 の 最後 に 乱文 を ぉ わび 申し 上 げ ま す . 
うか ? 得点 が 大 きい 方 が 気持 ちがい いで し | る の に 時 間 が か か っ て し まい ます . これ か | ロロ 参考 文 南 
52 ら は も っ と も っ と 短 時 間 で プロ グラ ム が 組 1) 川村 清 : “PC-8001mkII 解 析 マ ニュ ア 
少し 難し いか も し れ ま せん が , 自分 で 敵 | め る よう に 努力 する つも り で す . 皆さん も мІ, H", 秀和 シス テム トレ ー デ ィング 
ミサ イル の 頻度 を 調整 し て みて くだ さい. 頑張 っ て くだ さい . 2) PC 活用 研究 。 工学 社 


BROKEN マシ ン 語 リス ト 


Add +0 +1 +2 +3 +4 +5 +é +7 +B +9 +A +B +C +D +E Bo40 
ACG CD AB АС CD Сі АС CD SA АҒ CD Dé C4 ЗА АВ ED : BOSO 
ACió 32 АВ BD Её OF А7 CC 27 B1 CD 1B C9 CD D9 BB Bo60 
АС20 AB BA CD EB Bé ЗА АВ BD А7 E4 55 B3 ЗА АВ BD BO74 
АСЗӨ EC 94 B4 SA АВ BD A7 E4 D1 BS 3A AB BD Eá ОЗ : E284 
ас4о C4 DE B9 CD Ві Ві CD F4 B2 CD 4C B2 2A 15 BE қ BO94 
ACS 56 Ві 79 A7 C2 CS BE 24 15 BE CD FS АҒ 79 A7 CZ | 
RC69 90 Có ЗА 1B BE А7 C2 90 СО ЗА АВ BD FE 02 2 2 BOBO 
AC79 2A АЗ BD 11 79 17 CD 95 40 30 15 3A AB BD FE Boco 
QCB9 28 ВА 2А А5 BD. 11 ре 97 CD 95 40 20 өз CI eC воре 


АС90 ЗА 14 ВЕ ZC 52 14 BE CD ВА C4 SA АВ BD 3C 22 қ HOEG 


RDB の 9 21 04 C4 CD 27 AD 21 40 DB 22 өр БЕ 21 DA сі 22 B1D6O 
RD ワ 9 12 BE ЗЕ 60 32 74 BE FD 21 24 BE FD 26 90 д1 や B1EO 


-------------------------------------------------------- 260 


Sum 90 2А 51 36 BD 31 SD AD 53 CB 24 SC 52 D4 7F B210 

B220 

B270 
Add +0 +1 +2 +5 +4 +5 +6 +7 +8 49 +A +B +C +D +E B246 
AEOO FD 21 24 BE FD 36 00 01 FD 36 ОВ 99 FD 36 10 3 В250 
AE1@ FD 56 18 90 FD 36 20 61 FD 36 28 01 C9 DD 21 2 B260 
AE2O C4 CD 37 Ар 21 の 9 DC 22 өр BE 21 BE С? 22 12 2 B270 
AESO AF 32 74 BE FD 21 24 BE FD 26 Фо 01 FD 36 08 | B280 
RE49 FD 36 109 91 FD 56 18 61 FD 36 20 Фі FD 26 28 3 B290 
AESO C9 DD 21 3C C4 CD 37 AD 21 40 DC 22 өр BE 21 BAG 


AE6 の 9 C2 22 12 BE ЗЕ @1 32 74 ВЕ FD 21 24 BE FD 36 9@6 BEE の 


Add +O +1 +2 +3 +4 45 +6 +7 +8 +9 +A +B +C +D +E 
BOO A7 C4 OF BO 79 А7 CO 11 ОВ @9 FD 19 10 EF C9 
B の 1 の 7E 01 FE 01 CO FD SE 02 1C ІС ІС FD 56 035 14 
B020 14 7B BD D8 7D Сё ёё BB DB 7A ВС 08 7C Cé 66 
возо 08 OE 01 C9 OE OO ED SB 15 BE 14 14 14 ІС ІС 


p 皆さん 今日 は . 僕 は JR-200 ユ ー ザ ー で す . 3 月 号 p184 の ネ ク ラ の クラ ちゃ ん , JR-200 に は 強い 味方 の 音声 認識 パナ ボイス (JH600) と いう 
も の が ある じゃ な いか .。 ちょ っ と 値段 は 高い が これ る ぇ え あれ ば JR-200 も 名 機種 の 仲間 入り だ ろ !? ケシ ゴム キー ボー ド が な ん だ / ғы 
ウス や マッ ピー が な ん だ ./ そん な も の ファ ミコ ン が あれ ば いい じゃ な いか / 電気 製品 メー カー の 元祖 は ナシ ョ ナル だ / 

| (キン 肉 マ ン Jr.) 
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BROKEN 


Add 

BEGG 
БЕ10 
EE で 9 
BETO 
BE 46 
BESO 
EEA 
BE70 
EES 
БЕ9О 
BEAO 
EEBO 
BECO 
BEDO 
BEEG 
BEF oO 


COGG 
Colo 


жо 
оо 
oo 
eo 
BA 
eo 
oo 
ed 
eo 
eo 
eo 
Jy 
оо 


Copo 3 


соо 
CO4 


сөбө 32 
Собо 3 


CO7 


Cogo 52 


COG 
COAG 
COBO 
COC 


C100 
C110 
C120 
C130 
C140 
C150 
C166 
C176 
C184 
C19o 
CIA 


Sum 


Add 

Собе 
C210 
C220 
C230 
C246 


C250 3 


C260 
C270 
C280 
C290 
C260 
CEE の 9 
CELO 
C2D6 
С2ЕӘ 


OJOO 
оь 


マシ ン 語 リス ト 


+1 
eo 
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eoo 
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оо 
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eo 
eo 
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4:5 
ao 
оо 
eoo 
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eo 
оо 
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*6 
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2244 


Dod 
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C349 
С550 
C360 
C370 
C384 
C390 
сло 
CIBO 


C400 
C412 
C420 
C430 
C440 
C450 
C440 
C470 
C482 
C490 


C4ao 2 


Саво 


C500 
C310 
c520 
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C540 
c550 
C560 
C570 
CS8? 
C590 
CSAS 
CIBG 


C700 
C710 
C720 
C730 
C740 
6750 
C760 
C770 
C780 
C796 
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を みな みり ょ うこ さん ファ ン の OFF で す . えー ん うち の PC-1251 が 壊れ ちまっ だ だ よー. 実は A 君 が 液晶 の と ころ を 踏ん づけ て , 割っ て し ま 


っ た だ だ 一 .。 修理 代 が な いよ ょ よー. PS. OFF の コン サー ト 見 に いく よー/ ノ 


Р.52 これ に 関す る イラ スト の 方 も よろ し く / 
(キツ ネ に 取り 付か れ た OFF ) 
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Cn ci LI 


Dooo 
Doio 
Do20 
DOZO 2 
ро4о 
DOSO 
D969 
` pe7e 
D989 2 
ро90 
роле 
рове 2 
Deco 
DDØ 
рдЕО 


Ccoo 
CC19 
сс2о 
э] юк! 
CC49 < ч > к Ж p H ^A Е ETE ETE ^A C 74 (^ К KT . (20 
сс5о E - DIOG ó оо oo ос 26 ә е 2c оо 106 


АС ЗЕ СӨ 
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4 


Cu 


Qnm cen (Л (Л o cn o N o co o o Oo + 
cn U Ci cn Cn cn Cl cn O ci t3 cn cn cn (n c ¿n 


Cn rj) M m M (n O = м = t 
Pr OCHO (n 0- O к 


p 僕 は Pi03| の p.143 の BIG ESCAPE1251 を PC-1245 に 移植 し まし た . も ちろ ん メモ リ 数 は 足り ませ ん . そこ で グラ フィ ッ ク で は な く "1" は 
F7, 72" は 階段 と か に し て や っ て みた の で す . それ で も 足り な か っ た の で ,、 コマ ンド を 縮め た り し て な ん と か 入れ まし た . グラ フィ ッ ク で 
な く て も アド ベン チャ ー ゲ ー ム な の で と て も 面白かっ だ た よ / グ PS CE-124 壊 れ ち ゃ っ た . ^| 
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Dcoo 
DCie 
осте 
DCze 
рса 
DCSE 
DCO 
рс? 
DCS 
pco9o 
DCA 
DCE@ 
Dcce 
DCDe 
DCEG 
DOCFO 


Sum 
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27 
LA 


57 68 90 BF 


go 
ВЕ 


во 5 


8o 
geo 
85 
81 
go 


54 СӨ FD 


54 Е9 60 


016: 


SPACE CAT 


UNCHI 


FISH 


oo от 
oo 02 
eo 2A 


geo өз 
АА AA 
go 36 
85 45 
go 45 
Aa AA 


22 1A 74 1B :E7 


.DD4o 


Add +® +1 
рроо AA AA 
DD19 BD 55 
DD26 B3 X3 
оро Bo оо 
20 AA 
DDS во CC 
ррвео во оо 
DD76 DD DD 
ррво оо өз 
DD? OB ОЕ 
DDAO AA А2 


оре АЗ 55 


DDCo 95 55 
рррё 95 55 
DDEO 95 55 
ррға АА AA 


add +9 +1 
DE22 AA АА 
DE10 BF 55 
DE2%@ BF 55 
DEO BD 55 
DE42 AA AA 
DESO BF 57 
DESO BF 57 
0Е7@ ВЕ 55 
DES? АА AA 
DE9 の ВЕ SF 
DEAG BF SF 
DEBO BF DS 
DECO AA AA 
DEDO BF 55 
DEE@ BF FS 
DEFO BD F3 


Sum 98 7C 


add :+0 +1 
DF の の АА AA 
DF19 BF FS 
DF20 BF FD 
DF39 BF DS 


22 44 4 
AA AA BF 
Sig, ui uc 


eJ 


+5 
ЕЕ 
ae 


we db B5 $5 


eoo 7E BO 
AA AB ВЕ 
СС CE 8Е 
өз x2 ве 
DD DF F7 
во oo eo 
Bo EQ 2B 
BA AA AA 
55 5А 95 
55 56 95 

56 95 
925.96. Ме 


AA aa 2А 


ee 
mI, 


4ә FB СВ 


+2 +š +4 
AA AA BF 
ES FE ВЕ 
55 FE BF 
FF FE BF 
Añ ЛА BF 


ЕЕ ЕЕ ВЕ ® 


ЕЕ FE BF 
S5 7E BF 
АА AA BF 


F5 FE BF 5 


F5 FE BF 
57 FE BF 
АА AA BF 


9d 7E BD 5 


SS FE BD 
SF FE BF 


EE FEEL 


+8 
EF 
EC 
Бо 
БЕ 
Bo 
8e 
zA 
DD 
ea 
20 
A 
95 
°% 
95 
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BROKEN マシ ン 語 リス ト 


+9 +A +E +C +D +F Sum 
FF FF FE EF 55 7E :05 
АА А2 SE Bo АА SE :9В 
eo oo SE BO @@ SE :оА 
FF FF FE АА АА AA :61 
CC CC. CE" BF. ӨС CE :14 
oo oo o2 go eo 32 :ЕӨ 
АА AA AB o2 aa во :66 
DD DD DF 3F FF FC :81 
АА AA во да да ao :7E 
ҒА АҒ АВ AA aa 

АА AA AA А9 56 
95 5e "3 9 
55 55 55. 5 O9 
595.55 55.75 959 
DF F7 Fé АВ АВ 
да AA АВ ог ag 


AA :9C 
ба :СЕ 
56 :68 
56 :54 
56 :54 
EA CS 
но :48 


= 
59 


Di 94 81 E2 ВА 


+9 +A +B +C +D 
FF FF FE BD 
57 FD 7E BF 57 
57 FF FE BF 57 
FF FF FE АА АА 
FF FF FE BD 55 
57 FF FE BF 57 
57 FD 7E BF 55 5 
FF FF FE AA Аа i 
FF FF FE BD 57 
SF F5 FE BF 5Е 
57 D5 FE BF 55 
FF FF FE AA АА 
FF FF FE BF FS 5 
SF FF 7E BF 
57 05 7E BD 55 
FF FF FE АА АА 


Co 8E EO 94 56 


ss 


55 


+9 +A +E +C +D 
FF FF FE BF FD 
FD. SF FE BF FD 
FD SF FE BF FD 
FF FF FE АА АА 


79 


て 


ソノ シー ト を 使う 前 に 


(ソフ シー ト を 全う と き に は 。 ソノ シー ト 


を 破っ だ た だ り , 傷 を 付け たり し な いよ うに , 


ミシン 目 に 治っ て 数 回 折り 曲げ て か ら , 
CED で そく だ きい で ジフ: シー 
F が 読み 込め な く て も お 取 替 で きま せん 
の で ご 注意 くだ きい). 

友 ホ コリ も ロー ド ・ エ ラー の 原因 に な り ま 
す . カセ ッ ト に 録音 する 前 に ホコ リ を な 
СЛАСЫ Т OF TE 

次 ツメ シー トド は 何 度 も 陸前 に 必ず カネ セッ 
ト テ ー グ に 録音 し て お いて くだ きい 。 

雄 ソノシート は 通常 の レコード と は 大 きる 
が 違い ます の で 。 プレ イヤ ー の フル ・ オ 
ー ト の モー ド で は 正常 に 動作 し ませ ん . 
マニ ュ ア ル の モー ド で 使っ て くだ きい. 

友 い っ だ ん パソ コン に ロー ド し て OK と な 
っ た 場合 は , パソ コン か ら 別 の カセ モット 
ディ スケ ッ ト に モー プ し て 《 だ る きい 。 


デー タ ・ レ コー ダ 
- ま た は デッキ 


(p.48) [322] 

支 ロ ー ド お よび 実行 方 法 
NEWON 1 
CLEAR,O | RETURN | 
MOTOR OFF ,1 
LOAD[ RETURN | 


на лм ае O е ге é аге: ха A à е 6 f à é à а & f 6 е € à Ó е MK € é € ө ата 4 4 e à 6 4 4 A A 


VO V. VW 9$ 9 у . 9$ V 99V,» Vy Vw» w9»9 9*9» &$99 と '\ ух . 9*3 95» 5 


ЖКО ОӘО 


皆さん か ら の 要望 に こたえ て , で きる だ 


け 長 い プ ログ ラム を 中 心 に お 送り し ます . 収録 され た プロ グラ ム の 内 容 


は 少な い の で す が , 


RUN[ RETURN | 
セー= ジ 方 法 
SAVE "CRAZE" 


SAVEM "IGCHR", &H2000,& 


H3570,&H2008| RETURN | 


SAVEM "CRAZEM" ,&H2000, & 


Н4ОАО, &H2748| RETURN | 
ВІ 


200 ボ ー) 
(p.96) [1'19"] 


婦 ロ ー ド お よび 実行 方法 


RUN RETURN] 
婦 モ ー ブ 方 法 
BASIC 部 分 


CSAVE"C. MINE"| RETURN | 
マシ ン 語 部 
PiO モ ニタ を 起動 し て 


SDOAO, DEFF, С. RETURN | 
B2 


(p.133) [2'13"] 

太 ロ ー ド お よび 実行 方 法 
LOAD] RETURN | 
RUN[ RETURN | 

жез->ЖІЕ 
BASIC 部 分 


SAVE "CHIPCHAP" 


マシ ン 語 部 分 


MSAVE "M.DATA" , $3000, $3290 


(p.60) [3'32"] 


*u-— Kzl RKTT Pk 
LOAD[ RETURN | 
RUN| RETURN | 

же —7 5 


SAVE "THE BOMBER" 


ィ ノ 人 U 22 KO ひ 
(p.103) [0'23"] + [0'21"] 

BASIC 部 分 と マシ ン 語 部 分 が C 面 DIHI 
に か け て 収録 さき れ て いま す . 1 本 の テー プ 
に まとめ る か 、 フジ ァイル ご と に ロー ド す る 
ЕЛ (7784ж 
жо — К 5 URTHE 
LOAD[ RETURN | 
RUN] RETURN | 


どれ も 遊び ご た え の あ る プロ グラ ム ば か り で すず す . P 


KL—7T Bik 
ВАЅІС > 


SAVE "JIGOKU" 


SAVEM "J.M ", &H6FOO, &H7696, & 


H7FOO| RETURN | 
[) 


2 Р0-8000 ン リ ー ズ (@O ポ つ 
T ACO S02838F)Ə2) 
ee ド ぉ よび 実行 方 法 


ж — 7 515 
MON(RETURN | 
WAOOO, C89F| RETURN | 


トー ロー ドゥ ヒン トー 


皆 き ん か ら 寄 せら れ だ た だ た レ ポート を 読む と , 
ステ レオ な どか ら デ ー タ ・ レ コー ダ へ 録音 
Тасти со дарт. 

中 に は ワイ ヤレ ス ・ プ レイ ヤー を 使い , 
電波 を 通じ て ラジ カセ に 録音 し て 成功 し た 
と いう 報告 が 何 通 も あり まし た . 

一 般 的 な 接続 の 方 法 ほ し て は , RCA タ 
イプ と いわ れる ピン プラ グ x 24-Е ノラ 
ノレ ・ ミ ニブ ラグ と いう ケー ブル が 電器 店 な 
ど て で て 市販 され て いま す の で , それ を 使う の 
が も っ と も 便利 で す . 

プラ グ 類 を 秋葉 原 な どの 部 品 店 で 購入 し 
て , 自分 で 半田 付け を する の も よい で し ょ 
F, 

まだ , ステ レオ な どの 機材 が な いと いう 
Ab, 友だち に 使わ せ て も ら う な ど し て , 
ぜひ と も る 一度 話し て みて А7 15 

それ か ら ,。 テー ジ に 1 度 録音 する の で は 
な く 。 ステ レオ か ら 直 接 パ ソコ ユン に 接続 し 
て 成功 し た と いう 例 も 多数 あり まし た . 
А ОНО N ORAT, で きる だ け 
多く の 方 法 で 試し て みて くだ きい . 意外 な 
方 法 が ある か も し れ ま せん . 


編集 部 か がら の お 願い 


どの よう な 方 法 が も っ と も ロー ド し や す 
いか を 追求 し て いく た め に , 皆さん か ら の 
ロー ド の 報告 を お 待ち し て お り ま す . 

短い プロ グラ ム し か 入っ て な く て も 。 x 
で 打ち 込ん だ 方 が 速い と は 思わ ず に ., どう 
か 一 度 ロ ー ド し て みて くだ さい . その 機種 
で フフ ノシ ー ト が 有効 で ある こと が わか れい ぱげ , 
次 の 機会 に は 必ず 長い プロ グラ ム を 収録 し 
た いと 思っ て いま す . 

また , ロー ド で き な か っ た 人 の 報告 も お 
待ち し て お り ま す . 改良 が 必要 で あれ ば, 


いきなり で す が 僕 は ポ ボケ コン ユー ザー で す . いき な り ポ ケ コ ン ユ ー ザ ー が だ と 書き まし た が , 機種 は PC-1261 AND PC-1350 で す . 最近 は 


(O) ө 

マ ・ 新語 と いう ポケ コン の 性 能 を 飛躍 的 に 上 げ て し まう も の が あり ます . 今 こ そ カ シオ の PB より 速 く 面 白い ゲー ム を 作ろ う / 失礼 し まし 
TR (アパ ラチ アモ ドキ ) 

80 — 99 
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どん どん 改良 し て , ソノ シー トト を 。 Жа” 

ラム を 供給 する 新しい メデ ィ ア と し て 確立 

し な いで ど 生え TOSS. 
ロー ド で きた 人 も , で き な い 人 も PiO 編 

集 部 宛 に 下記 の こと を お 知ら せく だ さい . 

今回 ロー ド さ せ て みた プロ グラ ム , ロー 
К の 成否 

ФИЕН ЖЕМ 

9 その 他 , 今後 ソノ シー ト で 供給 し て ほし 
い プ ログ ラム が あれ ば その 種類 , また ソ 
ノシ ー ト を 再生 する と き の 技 術 的 アイ デ 
ィ ア な ど , ご 意見 , ご 希望 を 書い て くだ 
さい . 

送り 先 

BII 東京 都 渋谷 区 代々 木 !-37-| 
ぜん らく ビル 5F 

橋 工 学 社 PiO 編 集 部 「 ソ ノシ ー ト 」 係 
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SCENE :00 SCORE:001500 LEFT: 


«ж» “> 


o 
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j 


dee 
lr 


パソ コン DJ ソン シー ト 


ン 
DJ by Roxana 


қз 9 5,5 9» э 3 


SIDE A] | 

> Hello, everybody, this | is Roxana. u 
How's your friend, personal Computer | 
doing? ーー s 
b Heres а big announcement from | | 
Hitachi for S1 users. A user organiza- 
поп, "51 Club", is about to open, con- 
nected with TeleStar, the new personal 
computer network system. It features | 
many kinds of wonderful facilities: u 
such as, 
S1-Bulletin Board System for informa- 
tion exchange, message from Hitachi, 
and technical — s and answers for | n 
SI machines. u u 

In addition, you can get a a one- -year free x 
subscription to ŠI Club at “The Free + 
Entry Sales Campaign of Sl.” This (d 72 
special offer is for people who purchase | 

S1 from 4/1 to 6/30. x 
For further information, please refer to 
the S1 Club announcement from Hitachi 
in this issue of PiO. u 
p Now, let's get started. u — 
The first selection is "CRAZE SI" -- 
Your task in this game isto stop the time. し 
bomb. Squeeze your brain to get the best u ー Ü 
solution! x 
(SIDE B] 
* The next game is for the PC- -6000 
series, “COPPER MINE." Shoot down 
the UFOs attacking you. 
look! А monster's come! But don't 
worry, it hates infrared rays. This is for 
the JR-100 “CHIP CHAP.” —< u 
(SIDE С) x x ーー 
р Set the bomb, and blow up the building. 

This is for MZ-1500 "THE BOMBER.” | 

> Coming up next is Jigoku no | : 
wt `h x 


[SIDE р). 
р Sorry ior your 


p This time, at yo 
vou with the game 
8000series. 
Guard yourself. 


u "taste thi 


advice are 


you. Let's get I 
with computers! | 
Until. then, sta: u 
Co yaoa ra алаа Wd & u а аа оча аъ 6% 
注 : ソ ノシ ー ト の 損傷 に よる 返 本 は 原則 と し て 受け 付け ませ ん . 


ご 容赦 くだ さい . 


HT 83 


L HOPi02Z27—A 
PC-8000 シ リー ズ +PCG 


N-BASIC+ マ シン 語 


PC+PSA を 使っ た オリ ジ ナ ル ・ ゲ ー ム 
с. 派手 な 画面 を お 楽し みく だ ささ い . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


= | N-BASIC 
| マシ ン 語 A000—B07F 


荷物 を 番号 に 従っ て 運 ぼ うと する と , 
か な り 考 えま すね . パズル 性 が あっ 
て いい と 思い ます . (A) 


入力 ・ 実 行方 法 


まず リス ト 1 の BASIC プロ グラ ム を 入 
DL. まっ w プ に も ーー グ し まず 次 に 
CLEAR3OO,&HFFF を 実行 し て ,. リス ト 
2 の マシ ン 語 プロ グラ ム を 入力 し ます . А 
カカ し 終わ っ た だら, PiO'85 年 2 月 号 な ど に 
載っ て いる チェ ッ ク サ ム ・ ブ ログ ラム で チ 
ェ ッ クサ ム を 確認 し , 間違い が あっ た だ たら 訂 
IELC (7780, チェ ッ ク サ ム が 完全 に 合 
っ だら, リス ト 1 の 後に セー プ し ます 。 

oe て でき だらり あッ みあ も で Б е Б 
を チー ゲ か ら ロ ー ド ) RUNL2 f. £ 
れ で 動け ば OK で す . エラ ー や 何 か 異 常 が 
出 だ ら 。 も う 一 度 リ スト を 見 直し て みて < 


160 ° 

з 

119 71 
| 

120 *| 
| 

130 * — 

الس 

140 " 

150 CLEAR10606,£H9FFF:DEFINTA-Z 


МАМЕ ALL 


176 DEFUSReG-&HAAEO: DEFUSR1-£&HAB460: DEFUSR 


machine Ад00-БО?Ғ 2-£HABR60: DEFUSRZ-£HAB9O 


Frogramed by Н.КОММО in 1984/12 


166 CONSOLEO, 25,6, 1: WIDTH46, 25: OUT15, 54: 


皆さん お 元気 で すか ? 


HHULHHHHT 


"i 


ШП 


19x. 


%% = 
ゲー ム の 説明 

RUN す る と デモ が 起動 し ます . 
| RETURN | キー で ゲー ム ・ ス ター ト で す . 

画面 右 下 に いる 人 を 操っ て 散ら ば っ て い 
る 6 個 の 荷物 を 下方 の 穴 に 入れ て くだ きい 

人 は テン ・ キ ー の [21|[4][6][al で 動き ま 
7. 729, は し ご が な いと 上 に 昇 れ な い 
L, 下 に な に も な い 所 で は 人 は 落ち て し ま 


いま す ( 画 面 が 縦 に な っ た と 思っ て くだ さい ). 


エイ リア テン は 上 か ら 下 へ あみ だ くじ 式 に 
降り て き て , ワー ズ プ 容 を 通っ て 上 に 戻り ま 
+. 動き に 慣れ て し まえ ば , か わす の は 簡 
ао, 上 手 に 逃げ て くだ さき さい. 372, 
人 も ワー ジ 穴 が 使え ます が , ワー を 繰り 
返し て 戻っ て し まう こと が ある の で (や っ て 
みれ ば わか る ) 注 意 し て くだ さい . 

画面 の あちこち に ある 番号 の 付い た も の 
が 和 荷物 で 。 人 が 押す と 動き ます . 荷物 は 重 
い 割 に 壊れ や すく 〈, 荷物 や 人 が 上 に 乗る と 
崩れ て し まい ます ,。 気 を 付け て 運ん で くだ 
きい . 

穴 の 上 に 持っ て くる と 格納 る され ます が , 
荷物 と 穴 と の 番号 が 合う と 高 得点 が 得 られ 


きれ い に 番 号 順 に 入れ て 1 面 ク リア 


リス ト 1 MANFALL BASIC リ スト 


180 DEFUSR4-£&HAABe: DEFUSR5=&HA478: DEFUSR 


6-zftHAC6606:DEFUSR7-&HADo6o 


196 DEFUSR9-£&HA410:A-USR9(09):FOKE-192,0: 


FOKE-191,0 
200 COLOR1,2Z6:PRINTCHR$ (12) : LINE (0, 1) -( 
0,22),"N",5 

219 COLORS, Z2:LOCATE28, 1: PRINT" 
226 COLOR7:LOCATE28, 2: FORI=9TO8: FRINTCHR 


Ф (РЕЕК (1-22160)) $ : NEXT 
250 COLORS:LOCATE28,Z:FRINT"——.[@. n: 5 
#*$=SF'ACE$ (7) +CHR$ (176)+" " 

240 COLOR7:LOCATE28,7:FRINT" %22% EL 
OCATE28,8:FRINTS$ 

25€ LOCATE28,12:FRINT" モテ ッ メ ナ 
B,13:FRINTS$ 

26606 LOCATE28,17:FRINT" 271mb 

8, 22: FPRINTS$ 

270 LOCATE28,18: FRINTSFC(7)"7 " 
280 "***x DEMO +++ 


Жой; : 


27. 6 個 の 荷物 を 格納 する と 面 ク リア で , 
残り 時 間 が 得点 に 加算 きれ, 次 の 面 に 進み 
šT. 2 面 。 4 面 。 6 面 。… を クリ ア す る 
と 人 が 1 人 増え ます . 9 面 以降 は 荷物 が よ 
り 重 く な り ま す . 

荷物 を 壊し た り , エイ リア ン に 当たっ た だ り 
し だ 場合 の 他 に , 時 間 が な く な っ て も 人 は 
死ん で し まい ます . 残り の 人 が いな く な る 
L SoctAKe: オ ーッ イー で す : 


プロ グラ ム の 説明 

プロ グラ ム は BASIC と マシ ン 語 (AO 0 
0 ゴーB 0 7FH) で 出来 て に (ます. キャ ラ 
クタ の 色付け に は 4F8H 番 地 の 内 部 ルー 
チン を 使い まし だ . だ ま に 色 が チラ つき ま 
す が , 仕方 な い の で 我慢 し て くだ さい . 

BUG は すべ て 取っ だ た つもり で す . FM 
を 壁 に 押し つけ た だり 横 に 並べ た りす る と 月 
れ て し まい ます が , 荷物 を 動か せな い 状 態 
に し て し まっ だ だ め 崩 れる の で あっ て , 
BUG で は あり ませ ん . 


終わ り に 


わか り に くい 説明 で し だ た が, 実際 に ゲー 
ム を や っ て みれ ば わか る と 思い ます . ぜひ 
PE E A Ле Л Өлө. us この プロ 
グラ ム は EDAS Verl. 2 で 作成 し まし た . 


お まけ 


ゲー ム に 慣れ た だ 方 は , AAF 0 HH 番地 か 
5, C8, AZ と 書き 込ん で みて くだ さい …. 


":ГОСАТЕ2 


"SsSLOCATEZ2 


Robin TF. 我 PCUC も か な り メ ジャ ー に な り ま し て , 会 員 も 30 人 を 越え ま し だ . これ も みな ポケ コン ファ ン の 皆 


ШОСТ. 私 は うれ し い 。 と ころ で 先日 あの 迎 夢 快 人 きん か ら お 便り が あり まし て 。 お 友達 に を な っ て し まい まし た . 分 度 遊 びに 行き ま 
POTES ER P.S. ШЕБІ ЗА, ポケ コン 買っ た な ら PCUC に 入会 し て くだ さい . 私 が 手 と り 走 と り 教 ん えて あげ ます . な ん な ら プ レ 
"ゼン ト し て も いい で す よ . な ん せ 6 台 も ポケ コン を 持っ て いま す の で …。 ` 


290 LINE(2,23) -(25,23 
": 60508810 

300 LOCATES,23:PRINT" X/t* ":i:COLORÓ6:FRIN 

TMI"; 

310 COLOR7:PRINT" ヤマ EPF+AP"CHRS (252) " "; 

:РОКЕ-1109,0 

220 FORI-1TO22:POKEI*120-2241, (1%Ұ4)ж22%4 

Q:NEXT 

326 A-USR7.(Q09):FORI-eTOZ60: IFINF (1) AND128 

ТНЕММЕХТ : GOTOZ Z6 

540 °жжж INIT. *** 

350 ASUSR1(60):MAN-3:LOCATE28, 12: PRINTS$ 

366 ASUSR2(0):LINE(2,22) - (25,22) ,"",2 

376 COLOR7:FORIsO6TOS:LOCATEI*Z45,22:FRIN 

TCHR$ (241+1) 5 : NEXT 

386 A=USR3 (9) : FOKE-185, PEEK (-186) 842 

396 COLORé: LOCATE29, 22: PRINTSTRING$ (MAN, 

238)" " > 

400 COLOR7:LOCATEZS, 22: PRINTCHR$ (MÓN 177 

) 

410 "3x* SCREEN жжж 

420 COLOR: A$-"e":GOSUB810 

436 FORI-2TO22STEFA:LINE(3,I)-(24,1)," " 

: NEXT 

440 FORI-2TO18STEPA4:FORJsZ-2*((I42)MOD8- 

9) TD24STEP6 

450 LINE(J,I)-(J,I*4)," ":NEXTJ,I 

460 COLOR7:LOCATE11,10:PRINT"4ZT*HLb"CHR$.( 


252) 


‚"Ө"„2:СО1ОК7:А%=" 


ボア ク リス トノ MANFALL マシ ン 語 リ Abs 


320 
A336 
A346 
A350 
aieo 
A370 
A380 
A390 
ASAG 

вө 
a3ce 


(女性 会 員 が と っ て も 欲し い Robin) 


47@ 7=999: 60508800: A=USR4 (0) 
486 COLORS: LOCATEZS, 2: PRINT"$":LOCATE2S, 
22: РКІМТ"% 

4909 A-SUSR(GQ):0UT2,8:FORJ-eTOS:FORI-1TOSe 
:0OUT12,0: OUT12, IS NEXTI,J 

Seo COLOR7:LOCATE11,10: PRINTSFC(6) 1 

510 "xx* MAIN +++ 

520 A=USR (6) :T=70: 60508890 

530 Р-РЕЕК(-185):ІЕР-1 ЗӘТНЕМ52 

540 OUTZ, ©: IFF-128THENZ7ZSOELSEIFF-2SSTHEN 
өзе 

550 *### CRASH +++ 

560 А=Еж2-174: Ар=РЕЕК (2+1) *2*FEEK (А) #120 
ー さ 448 

570 FORI=0T07:T=99: GOSUEBBGO: FOKEAD, 225*F 
5806 BEEF1:GO0SUB860: BEEFO: POKEAD, 224: NEXT 
590 FORI-eGTOA4:T-26G0: GOSUBB86G0: FOKEAD, FEE ド 
(I-22168) : NEXT 

660 Jst£HFFSS«P*2:I-PEEK(J) : FOKEJ, Р#5+6:Р 
ОКЕЈ-1, 25 

610 IFFEEK (F*6-556) »2406THENCOLORF' 1 : ОСА 
TEP«*345, 25: PRINT"2"; 

6260 “жжж DEAD жжж 

өза YzPEEK(-128)-1: Х=РЕЕК (7127) -1 

646 COLOR6:FORI-eGTO6:LOCATEX,Y 

656 FRINTCHR$((161-*11*(IAND1)): 

660 ЕОКЈ=1Т05@: REEF 1 : BEEFO: NEXTJ。 I 

676 FORI-1TOA:LOCATEX, Y: PRINTMID$ (". 139" 
;,1,1)5 


ei 


リス ト 1 MANFALL BASIC リ スト 


6484 T2200: GOSUBGG6: NEXT: IFMAN>ƏTHENMAN=M 
АМ-1:60Т0380 

690 "«x** GAME OVER жжж 

700 COLOR7:LOCATE28, 22: FRINTS$ 
":ҒОКІзӨТО1:АФ-АФ-А%: 


710 A$z" яғА7 マヨ ナメ 
МЕХТ 

20 ҒОКІ=1Т025: ВЕЕР 1:1 ОСАТЕ10,10:РКІМТМІ 
ЮФ (АФ, І, 19) 

59 BEEFO:T-I«8: GOSUBBG6: NEXT: T=6000: 605 
UERSGOO: GOTO296 

740 'x** CLEAR +++ 
750 A-USR6(0):T-22000: GOSUBBOCOG 
7660 F-FEEK(C-186):P-F-1:FOKE-186,F: IFFMOD 
2O0RMAN?^STHENZ669 
776 MAN-MAN- i1: LOCATEMAN-29, 22: PRINT". "š: 
Tz156 
780 BEEF1:GOSUBS860: БЕЕРО: GOSUBS8O00: BEEF: G 
OTO366 
790 ^"x** SUE +++ 
866 FORJ=OTOT: NEXT: RETURN 
810 FORI=ØTO21:LINE(I+2,1)-(25,22-1), A$ 
820 LINE(2,1*1)-(25-I,22) , AS$:LINE (25-І, 1 
)-(2,22-1),А% 
836 І.1ІМЕ(1%2,22)-(25,1%1),А%:МЕХТ:КЕТИКМ 


, eo 
ao 
оо 


pio 


リス ト グ MANFALL マシ ン 語 リス ト 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ーー ーーー ニー ニー ニー «ке еөе 


eo AECO 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :00 
19 AEDO 20 E? 20 C4 C9 C1 CD CF CE C4 29 8C 8C 8C 8C 8C :81 
Се: AEEO 20 BS ве BO 20 DC DD 20 20 20 20 20 20 20 20 20 :2E 
АА AEFO 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :00 
ee Dp MU ridi mu Eu Miro 
SE Sum 90 33 Ав 86 B7 EC SD ES 47 D2 22 D3 84 DO Dé ЗС :AF 
o4 
e4 Add +0 +1 +2 +3 +4 45 +6 +7 +8 +9 +A +B «C «D «E +F Sum 
AF : aFoo 20 C2 CF CE D5 D3 20 BC 8C 8C 20 ра С? CD C5 20 :5А 
әр AF10 Вр 20 Ві BO 20 DC DD 20 20 20 20 20 20 20 20 20 :07 
әд :3 AF20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :00 
АҒЗӨ 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 の :00 
AF40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CB CS :50 
AF50 D? 26 Cé DS CE C3 D4 C9 CF СЕ 20 20 20 20 20 29 s:1F 
RF69 20 20 20 20 20 20 FE FE FE 20 FE FE FE FE FE FE :CE 
aF 7 の FE FE 20 20 20 20 20 20 20 А? 20 CD C1 CE 20 CD :E7 
AF80 CF Dé CS 20 20 20 20 20 20 20 20 20 20 20 20 20 :04 
nF ワ 0 20 20 20 20 20 98 95 99 20 20 20 20 C7 СІ CD C5 :00 
АҒАО 20 D3 ра Сі D2 D4 20 20 20 20 20 20 20 96 B8 96 :F2 


өө :6€ AFDO 95 95 95 95 99 20 20 20 20 20 96 Ва 96 BC 20 BE :07 
C9 AFEG 96 Bé 96 20 20 96 D2 C5 ра DS D2 CE 96 20 20 20 :8E 
до :6€ AFFe 20 20 94 95 9B 98 DF 99 94 95 9B 20 20 94 95 95 :ЕВ 
ӨЗ :83 || -------------------------------------------------------- 
00 : Sum 9E F4 1C F3 82 А6 F3 05 9F ZB ҒА 81 BB DE 5р D3 :DF 
21 

13 

оз Add +0 +1 +2 +3 +4 +5 +6 +7 +B +9 +A «B «C «D «E +F Sum 
82 B000. 95 95 95 95 9B 20 20 20 20 20 20 20 20 96 B2 96 :Ср 
17 :5€ BO10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :00 


BOSO 20 20 20 20 20 20 20 20 20 20 20 20 20 2g 70 20 : 9 
BOGO 20 20 20 20 20 20 20 20 20 20 20 20 50 72 БР 7 :18 
B0760 72 61 6D 65 64 20 52 79 20 48 2E АВ АҒ ДЕ ДЕ 4F :1F 


EE PEPE 
"Q9 と 今日 は Some bodyC$. 私 の プロ グラ ム が つい に PiO に 載り まし た . と いっ て も ミニ PiO な ん で す が …。 3 月 号 に 本 名 で 載っ て いま す 。 L 
Ол Ол ころ で , PiO に 載る イラ スト は と っ て も きれ いで すね . つく づく そう 思い ます 。. 私 も ちょ っ と は イラ スト を 描き ます が , 人 物 は へ だ くそ な ん 
C3. も し, うま く 描 けた ら 送 ろう と 思っ て いま す .  P.S.1 私 の 通っ て いる 高校 は 進学 校 な の で , 2 年 に な る と 大 学 入試 あめ ざる な けれ ば 
86 ec な ら ず , コン ピュ ー タ に 触る の も 月 に 1 2 回 くら いで し ょ う . し か し , 私 は それ に も めげ ず に プロ グラ ム 作 り に 精 を 出す の で し た (ちな み に 


N&-BASIC - 7 z УАН 


PC-BODODU-—A 


3XNLS6T—vYUIXocb5OBXfFX^ 
ー ス コス モ ・ ア ド ベ ンチ ャ ー シ リ ー ズ の ヒ 
ー ロ ー “キッコーマン” が 帰っ て 来 た . 
頼む キッ コー マン . 行け 行け キッ コー 
ту. 悪 の パピ コー ン 軍 団 を 討ち 減 ぼ し , 
平和 な 地球 を 取り 戻せ . キッ コー スー ツ を 
身 に まとい ,。 ショ ル ダ ー・ ア タッ ク ぶ ちか 
まし , 群がる 敵 も な ん の その , F v. (mo 
な キッ コー マン , 寂し いと きも ある けれ ど 
平和 な 地球 を 守る た め , キッ コー マン は 今 
日 も 行く . 
圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


Neso-BASIC 2 本 
マシ ン 語 DA00-DE7F 


41 
>> 
FD 
アイ デア は それ な り に いい と 思う 


けど , ゲー ム 自 体 が 単調 すぎ な い 
か な . (A) 


まず IPL プ ログ ラム を 打ち 込ん で , テー プ 
に セー ブ し ます . 次 に PIDO モ ニタ を 使っ て マ 
シン 語 を 入力 し ます . そし て それ を テー ジ 
に セー ブ し た 後 , 最後 に BASIC を 打ち 込ん 
で セー プ し ます .。 Хы, ペー ジ 数 は 2 で す . 


YY すす 


あな だ は キッ コー マン と ヒ と なり, カー ツジ 


30000 RESTOREZ1Q0Q00:FORI-&HF878TO 
&HF8D1: READA$: FOKEI , VAL (" &H'" +A$) 


30010 NEXTI:EXECEHFB87C 


51000 DATA 1a,c2,06,1b,cd,9a,25, 
05,05,с4,70,1а,Ғе,аҒ,20,Ғ7 


21010 DATA 10,47,21,52,Ғ8,06,06, 
cd,70,1a,77,23,10,f9,cd, 06 
21020 DATA 1b,af,22,38,f8,21,76, 
25.cd,cf,30,21,36,f8,cd,cf 
51050 DATA 20,cd,9a,25,2a,32,f8, 


м -ODO ATHAN Ес FKL t 2Ë 
уат, ТУТЫ, フィ ング デオ ルン ы 
きよ くん ” を 倒し て くだ る い 。 

エネ ルギー が 青 の と き は 敵 に 体 当たり し ま 
し ょ う . 黄色 に な っ た だ ら 敵 の 方 が 強い の で 
МИРТ enm» ev 
捕まえ を て エネ ルギー を 補給 し まし ょ う . こ 
の と き 。“ バ レーマン" の 方 が 高い に エネルギ 
ー を 持っ て いま す が , “パン キチ "は 高い 得 
点 を 持っ て いる の で , どちら を 捕まえ る か 
は キッ コー マン と し て の あな た 光 第 で す . 

キッ コー マン は 左右 に 動け ます が , キー 
を 離す と 前 進 し て いき ます . そし て 上 か ら 
は み 出 る と まだ た 下 へ 押し 戻る れ ま す . 


CLL 


陰険 な 細い 目 が 表わす と お り , 一 番 う っ 
Li L4, キッ コー マン の 方 へ すり よっ て 
きま す . キッ コー マン の エネ ルギー が 青 の 
SNIDER STE TEI 

通称 "いん けん だ けど カモ に も な る よ " 


バン ダイ у umm 
心 な し か 某社 の マー ク に 似 て いる . バイ 
ン バ イ ン と は ね 回 っ て いる . 意表 を つい て 
tM Li. 
通称 "は ね て る だ け か と 思っ た だら 意 表 を 
つい て うっ と お な し いや つよ . フ ッ フ ッ フ フッ" 


や まき よく ぐん ww 


“ぼぼ ぼぼ く は 一 , き ゅ ゆき ゆき ゆき ゅ 一 
し ゅ うに 一 。 きき きき だ ん だ が 一"、 て 有名 
な や 〇 し だ た だ 〇 よし を モデ ル に し た だ が 意外 に 
も すい か に 似 て し まっ だ ただ. 夏 の 夜 の 主演 で 
ある . 適当 に 放浪 し て いる . 

通称 "すい か と 思う な 思え ば 負け よ . 7 
| リスト 1 IPL BASIC! 2 F e 


ed,4b,34,f8,1e,00,cd,70,1a 
31040 DATA 57,83,5f,72,23,0b,78, 
b1,20,f3,cd,70,1a,bb,ca,aa 
31050 DATA 1a,cd,06,1b,21,85,03, 
с5,с+#,50 

31100 PRINT :CLOAD 


いか が か わい や か わい や すい か” 
M — 
パ バレー マン 

キャ ラク タ の 中 で 唯一 青 が まじ っ た だ 色 キ 
チ ガ イ 的 色 を ほこ る . エネ ルギー は だ くる 
ん 増え る が 点 は 低い . 

通称 "エネ ルギー は だ くさ る ん 増え る が 点 
は 低い ぞ , や ー い だ まさ れ た だ" 


パン キナ mmt 


エネ ルギー は あま り 増 えな い が , 点 は 高 
с, 通 好 み で ある . 

通称 "エネ ルギー は あま り 増 えな い が 点 
は 高い ぞ 通 好み " 


LL dod d 


L4 bh! 


初め て や る と 必ず と いっ て いい は ほど 0 点 
で 死に ます . 打開 策 は すり すり を 充分 引き 
付け て バレ ー マ ン に 体 当 だ た り を 敢行 し て く 
だ ゲ る きい 。 

マシ ン 語 担当 小林 圭吾 , BASIC 担 当 薩 川 


X. 2—22 MAMEET 2 b し 


まし だ 。 ジャ ンジ ャ ン 


オー ル ・ キ ャ ラク タ 
gygy ... きり よっ て きま す 。 

・ は わ て きま ます 。 

. ほう うう し て ます 。 

. お ぶら て あき ます 。 
050899, 388 


ンダ イン 

や まき よ くん 

IT ルー マン 

Аб 
HI-SCORE' 3678 


Ву K. Kobayashi 
Y. Satsukawa 
Y. Kasuya 
HIT SPACE KEY 


使用 機種 は 88SR, 98F で す . べつ に 持っ て いる わけ で は あり ませ ん ). Р52 早く 常連 の 仲間 に 入り だ い / (Some body) 


87 


pi 


DAQQ: 21 
DAQ8: DA 
DA10: 82 


DA18:CD 3 
DA20:DF 3 


DA28: 23 
рАЗ0:2 
рАЗВ: 21 
0А40: F3 
DA48: 2A 
DASA: ра 
рА58: ØA 
DA60: Ср 
DA68:FE 
Da7 の gi 18 
DA78: 10 


Sum: 86 


DA80: 3 

DA88: 30 
DA90:D3 
DA98: ЗЕ 
DAAQ: ЗЕ 


DAA8: AO 3 


DABO: 07 
DAEBi の 1 
расе: DE 
DAC8: ЗА 
DADO: 6F 
DAD8:11 
DAEQ: 32 
DAEB: DF 
DAFQ:6F 
DAF8: DE 


рвов: DF 
DE の Bi 4F 
DE10:08 
DE18: 08 
DR20: QE 
DB28: B9 


DE3SQ:BD 3 


DES8: 79 
DE4@』 CD 
DE48: QQ 
DESO: ЗА 
DES8: 6F 
DR6Q: 3A 
DE68: 04 
рЕ70:11 
DE78: 32 


DEBA: DC 
DB88: ØB 
DR9Q: SF 
DB98: 3D 
DEAQ: ØC 
DEAS: ØA 
DBRQ: 20 
DEBS: 32 
ресе: DC 
DBC8: 4F 
DEDO: 28 


DBD8:08 3 


DEBEO: 79 


DEEBsFF 3 


DEFQ@: DC 


DBF8:7D 3 


'Sum: F7 


DCAQ: Б 
DC の 8 : QE 
DC1 の zi の の 
DC18:11 
DC20:1F 
DC28: 77 
DC30:10 
DC38:2E 
DC40:CO 
DC48: FE 
DC50:23 
DCS8:29 
DC50: 77 
DC68: 23 
DC70:C5 
DC78:D4 


DC80:14 
DC88: 20 
DC90: CD 
DC98:DF 
DCAQ: 22 
DCA8: CD 
DCEO: EF 
DCB8: CD 
DCCA: 97 
DCC8: 19 


рсре: ср 
DCD8:19 2 


DCEQ: CD 
DCEB: 4E 
DCFQ:23 
DCF8:11 


Sum: 70 


REM JC JC JC ЗЕ E ЭЕ Зе E Je ЗЕ € Je ЭЕ ЭЕ ЭЕ JC ЭЕ JC € ЭЕ e 363€ 


REM * MUSIC  Y.Kasuya 
REM «жеке 3€ J 3€ 3€ 3€ ЭЕ 9€ ЭЕ 3€ ЗЕ 9€ ЗЕ 9€ ЗЕ ЭЕ 9€ 
60 CLEARSO,&HD9FF : HQ 
70 SCREENS, 2,2: CLS: CONSOLE, , 。 の 
80 FORI-&HEOOQTO&HEI1FF:FPOKEI,8&HD 
E: NEXT 
90 A$-"ti30116r80SageB8c8dS5fgrió6g 
8 
100 COLOR 4:LOCATE1,1:PRINT "273 
ラサ リサ Ж4%у% 
110 PLAY A$:FLAY А%:ҒОКІ-0Т7040:М 


1 

2 REM ж スタ コラ サ ゅ サ ホイ サッ サザ + 
š REM * ソレ イケ ヤレ イケ トド フト イケ * 
4 REM * ""—h ж 
5 REM ж + 
6 REM ж 722" K.Kobayashi ж 
7 REM * BASIC Y.Satsukawa ж 
8 = 
9 


LOCATE1,3:PRINT "ソレ イケ ヤレ イケ クト" 7 


PLAY А%:ҒОКІ-0Т040:МЕХТ 
COLOR 2:1 ОСАТЕ12,5:РКІМТ "GA 


——————— э --- И Є{Җ о о анаарар ү ӨӨ Ө Ө - ўтН Н ° _ - НГ Нш ччччч-ч——ч-ч—- Е-—-—_——_——--—-—.—-—-.—.—.—.—— 
O С) ° (6) p 200X 年 。 ここ は へ へ 大学 の コン ピュ ー タ ・ ル ー ム . 1 人 ディ スプ レイ を 見 つめ て いる の が DAN 博 士 だ どっ た . 「 出 来 た っ / つい に 出来 た ぞ 
Ол Ол っ / Ж3ЗСЖеЗге/і ЖЕСЖЯЗІЕСВЕОЦЕОСУТ?КЕС-502, 一 晩 の うち に ゲー ム を プロ グラ ミン グ し て し まう と いう , рот 
有名 に な る の が 目的 の も の だ っ だ. 「 完 璧 じゃ や / これ で わし も PiO の 有名 人 と し て 復活 で きる わい 」. DAN 博 凸 は ニン マリ と し て , 40K バ 


200 


FLAY 


ЈАК2 す た こ ら さ っ さき … ゲ ー ム マシ ン 語 リス ト в 


5А:59 
ED: ES 
QR: ЕЕ 

5:06 
20:99 
В9:6Е 
7D: SF 
25:82 
DF:DE 
6F 』 34 
20: Dó 


"lió6oó6cr8cr8cccr4oSeeed 


ddeeeddddccr8cccccccccoóéccc 

210 COLOR 2:1 ОСАТЕ2,15:РКІМТ "HI 
T SPACE KEY"; 

FORIaG2TO400: NEXT 
LOCATES,8:PRINT "By 


220 
290 
260 
265 
270 
5 

275 
280 
K 


290 


500 


COLOR 
COLOR 
COLOR 


COLOR 
COLOR 


COLOR 


1=@ 


4:1 ОСАТЕВ, 9: РКІМТ "К.К 
S:eLOCATE9,10:PRINT "% 
4:LOCATE8,11:PRINT "Y. 


S:sLOCATE9,12:PRINT "% 
4:1 ОСАТЕВ, 15: РКІМТ "Y. 


S:LOCATE2,15:PRINT "НІ 
T SPACE KEY"; 


502 IFSTRIG(0)-1GOTO SCREEN 4:60 
TO 500 
304 I=I+1:IFI<>1@QGOTO 502 

310 SCREEN 4:COLOR 1,0,2:CLS 

515 FLAY "oS5t20018c4fg4a29g4f 4edd 
dcde4f4. 
518 EXEC&HDE48 

320 COLOR 1:10САТЕ5,1:РКІМТ "スリ ッ 


DD の の : の 1 
DD の 8: の 4 
DD 1 の : R9 
DD18:ER9 
DD20O: の 5 
DD28: E9 
DD さ の 』 ØC 
DD38:23 
DDAQ: 30 
DD48: 23 


р050:01 32 


DDSBi 2A 
DDéA: A3 
DD68: 10 
DD7 の 』 10 
DD78: の の 


0080:01 
DD88: の の 
DD9@ の =』 1 1 
DD98: の の 
DDAO: 10 
DDA8: の の 
ррве: 55 
ррв8: 15 
DDCO: 10 
DDC8: 01 
DDDØ: 41 
DDD8:41 
DDEQ: 14 
DDE8: QQ 
DDFQ: 00 
DDF8: の の 


DEO: の の 
DE の 8 : 00 
DE12: の 
DE18: 54 
DE20: 00 
DE28: 54 
DEZA: ØA 
DEZ8: 2A 
0Е40: 12 
DE48: OE 
0Е50: QE 
DES8: DD 
DE60:11 
DE68: 2E 
DE70: ØE 
DE78: OE 


リス ト 3 す た こ ら さ っ さ …BASIC リ スト mum 


U з." スリ ヨッ テキ マス ズ 。 
550 LOCATES,3:PRINT 


. リネ テキ マズ 。 


340 LOCATES,S:PRINT 
・ ホウ ロウ シテ マズ 。 
550 LOCATES,7:PRINT 


` オチ テキ マズ 。 


560 LOCATES,9:PRINT 


・ オチ テキ ママズ 。 


565 РКІМТ:РКІМТ " HI-SCORE"H*10 
370 LOCATE17,12:PRINT "By K.Koba 


yashi 


380 LOCATE20,13:PRINT "Y.Satsuka 


Wa 


390 LOCATE20,14:PRINT "Y.Kasuya 
595 LOCATES,15:PRINT "HIT SPACE 


KEY"; 
400 1= の 


50 


50 


10 


500 


50 
"y y 4 


"7799 7у 
"np 


"° シキ チ 


405 IFSTRIG(@)=1GOTO 500 : 
410 I-I*1:IFI«5250GOTO 405 


420 GOTO 70 
500 SCREEN 3,2,2:COLOR 3,1,1:CLS 
“505 M-z3:GOSUB 5150 

510 LINE(Q,0)—(175,1912 , 1, BF 


イト ほど の ゲー ム を 作る よう 命令 し , 自宅 に 帰っ た だ. ЖО, DAN 博 士 は 期待 に 胸 躍 ら せ , 研究 室 に 飛び 込む な り デ ィ ス プレ イ で プロ グラ 


PO 


リスト 3 す た こ ら さ っ さ …BASIC リ スト 


520 PLAY "o4t25514cef-dcd2c.r8cd || 620 LINE(184,145) -(198,179) ,2,BF || 2050 DATA 0,0,0,0,1,1 
gcd.r8d8","t255o6ciei..c2e2" 700 FORI-QTO6UQ0: NEXT: GDSUE さ の の の :E || 2040 DATA 0,0,0,0,20, 
521 H3$z"" `XEC%HDAQQ 2050 DATA 0,0,24,0,0, 
522 H$=STR$ (H) :H1=5-LEN (H$) : IFH1 || 800 SOUND7 , S6 5060 TI=FEEK(&HDF2) 
»0GOTO FORH2-1TOH1:H2$-HZ2$*"Q":N | 1000 PLAY "V1 の t25 の 18o2Ced+ と ed+cd || 3070 1=FEEE(&HDF2 の ) 
EXT *114","V10t2501804ced*ced*cd*114 || 3080 S2=FEEK (&HDF21) 
524 LOCATE11,2:PRINT HZ$;:PRINTC || 1001 PLAY "Ув", "ve" 5090 FOKE&HDF22,81 
НКФ (29) ;H; "Ø 1010 FORI-OTO100Q9:NEXT 3100 RESTOREZO10:FORI-M5HDFOOTOSH 
528 LOCATE11,1:PRINT "HI-SC 1020 M-M-1:1FM-OGOTO 2000 DF27: READA: POKEI,A: NEXT 

550 LOCATE11,4:PRINT "SCORE 1050 GOTO 510 5110 FOKE%HDF21 , S2 

535 IFM=3GOTO LOCATE11,5:PRINT " || 2000 FLAY "18ti80o6babgf-*badg 5120 РОКЕЄНЮҒ20,51 

00000 2010 S-PEEK(&HDF21)*256*PEEK (kHD || 2150 POKE&HDF2Z,TI 

540 LOCATE11,7:FRINT "MAN- F20) 3140 RETURN 

550 LOCATE13,9:PRINT "By" 2020 IFS>HGOTO H-S 5150 КЕМжжжжжжуз% DEREK 
560 1.0САТЕ12,10:РБІМТ "К.К" 2050 ҒОКІ-0Т0200:МЕХТ 3160 AD=&HDF2 の 』 FOKEAD , 0: FOKEAD+ 1 
1570 LOCATE14,11:PRINT "&" 2040 FORI-QTO1SSTEF2:LOCATE2, I:C || ,0:РОКЕАр-2,120:РОКЕАП--4,0 

580 LOCATE12,12:PRINT "Y.S" OLOR 4:PRINT "カト メオ ペル リョ ュ NEXT 2170 RETURN 

590 LOCATE14,12:PRINT "&" 2050 FORI-OTO1000:NEXT:GOTO 310 

600 LOCATE13,14:PRINT "Y.K"; 2000 КЕМжжжж va lxa3eexaexdew 

620 LOCATE14,7:COLOR 1:PRINT 5010 DATA 0,0,0,0,10,40,0,0 

OLOR Z:LOCATE14,7:PRINT M-1 5020 DATA 10,1,10,1,10,1,1,0 


ж ж ж ж ж ж COMPAC BEST 10 x x x x x x 


今月 の 1 位 は 新 製 品 の “ラグ ラン ジュ L | SF2 FYR or 6 &8J t GC Ü y Э. け の 価値 を 認め られ だ と いう こと で し ょ う . 
2 CT: ЙН, 本 格 的 な が SF アド ペン 2 位 以 降 は それ ほど 目だっ て 特徴 は あり EXAS FM ユ コンパ イラ は 既に ROM 版 が 
チャ ー で , その スト ー リ ー は 映画 を 思わ せ ませ ん が , 6 位 に は PiO 3 月 号 掲載 の ">* 発売 され て いま す が , これ は ROM 基 艦 付 
る も の が あり ます . この アド ベン チャ ー の Y yya” が 入っ て き て いま す . PC-8001 | で \29,000. 今回 DISK 版 に な b ¥9 800 と 
HH ОЖ, 今 ま で の アド ベンチャー mkII も SR が 新 だ に 加わ っ だ の で , これ が | 大 幅 に 値下がり し て いま す . これ で PiO 読 者 
の よう に , ひだ すら 試行 錯誤 を 繰り 返せ ば | 影響 し て も っ と 伸び て くれ る と いい で すね .】 の 人 た だ た ち も 高 速 ゲ ー ム を 作る ツー ル と し て 。, 
いい と いう も の で は な く , 科学 的 な 知識 に 5 て, 10 位 に や っ と 顔 を 出し だ と いう も 手軽 に 入手 どき る よう に な っ だ の で は ない 
虹 づい て 考え ん えな けれ ば 解け な いと いう と こ の が “EXAS FM コン イラ"。 と は 言っ TUI. 

ろ に あり ます . コロ ニー 入口 の ドア の 開け СЫ, シス テム も の で で スト 10 入 りす る の 
方 や ュ ン ピュ ー 條 を 本 ウッー シン パ が W. は めずらし いこ と で , この ソフ ト は それ だ 
順位 | 前 月 度 の 順位 | 商 品 名 | | - 価 ж | 
| ¥ 4. 800 
ッッ クビ ピッ ト Y 4,800 
¥ 5.800 
Y 3,800 
n Y 5.800 
Y 5.800 5 2HD 


C 


Lure uuausu MISCERE QOS3VU STRGE Q) 


ШИШЕ ae ШЕШ ы IRR 


SEIL 


6-5% 77 69° 8° pim 


ム を 覗い て みた だ. 牙 く で きこ と に 40K バ イト ぴっ だ 0 り の プロ グラ ム が 完成 し て いる らし か っ だ .。「 や っ だ ね /」 ЗА 5 TC 3 t tr 51 
プロ グラ ム を 走ら せ だ . し か し … 和 敬 く で きこ と に 画面 に 流れ だ の は 3000 以 上 に も お よぶ ペン ネー ム だ け だ っ だ た 。 
(アス キー コー ド の 大 海原 寝台 急行 「 安 芸 」) 


89 


9 


PC-6000 シ リー ズ +EXAS コ ン バ イラ ROM 


N60-BASIC( コ ン バ パイ ラ ) 二 マシ ン 語 


—— - 


Шы 


ヒッ トマ ン 


^u 


秀行 & 利 行 


ある 日 , ミニ チュ ア ・ モ デル の 会 社 を ギ 
ャ ング 団 が 読 撃 し た 。 た また ま , ТЕШ 
備 の アル バイ ト を し て いた あな た は , た っ 
た 1 人 で ギャ ング 団 を 迎え 撃つ は め に な っ 
CUZ; 

ас, あな た は めで た く ギ ャ ング 団 を 撃 
退 す る こと が で きる で し ょ うか ?2 … と い 
う よ り 生き 残れ る か !? 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


Neo-BASIC 2 本 
マシ ン 語 D9E0—DFFF 


ちょ っ と 難し いけ ど , 結構 遊べ る 
ね . で も バグ が ある の は …. 誰 か デ 
バッ グ し て みて は どう か な . (А) 


旨 32K モ ー ド で ペー 妥 数 を 1 に し ます 。 
@ リ スト 1 の BASIC リ スト を 入力 し , > 
ー プ に セー し ます 。. 

CLEAR 50,&HD9DE| RETURN| と し て 
マシ ン 語 の 領域 を 確保 し , PiO の "84 年 11 
月 号 に 載っ だ PIDO モ ニタ な ど で リ スト 2 の 
マシ ン 語 リサ スト を 入力 し ます 。 アド レス は 
D9E0HーDFEFFH で す . 入力 し 終わ っ た 
ら チ ェ ッ クサ ム を 確認 し て , 間違い が な け 
れ ば リス ト 1 の 後ろ に モー し ます 。 
一度 リモ ッ ト し て , 32KK モ ー ド で ペー ジ 
数 を 1 に セッ ト し まず 。 


リス ト 3 の ソー ス ・ リ スト を 入力 し ます . 


ガル デン ジン は 早 目 に や っ つけ よう / ノ 


90 が e iod. | 


入力 し 終わ っ たら 念 の なめ 別 の テー プ に セ 
СҮ 
ФЕХЕС &H4OOO| RETURN| で リス ト 3 を 


コン マイル し ます . この と き "STRING 


LENGTH ?" に は |RETURNI キ ー の みろ を 
押し ます . 


コン バ パイル が 正常 に 出来 よら リス ト 2 の 
後ろ 2 の に セー プ ブ し ます .。 うま く コ ユ コンパイル で 
き な か っ だ た とき は ば ,。 替 で セー デ し た テー ジ プ 


ЖІ 行 番号 マッ プ 


初期 設定 
メイ ン ・ ル ー テ チン 
弾 の 初期 

HIT MAN 移 動 
タイ ム を 減ら す 

КЕШ) (乱数 ) 

人 足 ぶ み 

弾 の 移動 

ガル デン ジン の 処理 
ЖОЖ) (追い か け ) 
判断 サブ ルー チン 

1 人 増え た 

敵 の 弾 

ガル デン ジン の 弾 を 消す 
進め 

7 7 7 いらない 

ギャ ング ス や られ た 
HIT MAN や られ た 
弾 が ガル デン ジン に 当たっ た 
ライ フル 拾っ た 

面 クリ ア 

初期 1 (ゲー ム ・ ス ター ト ) 
初期 2 ( 面 ク リア ) 
初期 3 (や られ た と き ) 
ゲー ム ・ オ ー バ ー 


イン プッ ト ・ ネ ー ム 
スコ ア ・ ラ ン キ ング 


スコ ア ・ テ ー プ ブル 
ゲー ム 説 明 

ハイ ・ ス コア 

ボー ナス ・ ラ ウン ド 
ボー ナス ・ メ イン 
ボー ナス 判断 

ボー ナス 死ん だ 
ボー ナス 

文字 表示 

文字 列表 示 
数 字 表 示 
スコ ア 表 示 

面 作 り 
デー タ ・ リ ー ド 
キャ ラク タ ・ ロ ー ド 
キャ ラク タ 描 く 
キャ ラク タ 消 す 
デー タ 


を ロー ド し て 問 違 い が な いか 認 べ て くだ る 
Uy 

9 電源 を 入れ 直し て , 32K モ ー ド で ペー ジ 
数 を 2 に セット し ます . 


表 2 変数 表 


MX, YER 

RMD < E: 

敵 の 動く 向き 1 一 4 

敵 の 弾 の 向き 1 一 4 

敵 の フラ グ ( ギ キャ ング スー 1 プラ ン ケ ン っ 2 ) 
4 АСР 

名 前 

弾 の フラ グ 

弾 の X, Y 座 標 

ШОО ё 

ガル デン ジン の 弾 の X, YER 
敵 の 弾 の フラ グ 

敵 の 弾 の スイ ッ チ 

敵 の 弾 の X, YEN 

敵 に 何 発 当 た っ た か の フラ グ 
自分 の 弾 の 方 向 1 一 4 

ボー ナス ・ タ ー ゲ ッ ト の X, YES 
ター ゲッ ト の キャ ラ 番 号 

ガル デン ジン と プラ ン ケ ン の 位置 
ボ ポー ナス ・ ク リア ・ フ ラグ 


スコ ア 
残り の 人 数 
増分 

面 

ガル デン ジン に 弾 が 当っ た っ た 回 数 
デモ の サウ ンド ・ ス イッ チ 
| 50-0 音 な し 

SO=1 音 あ り 

レベ ル 
人 が 1 人 増え た か の フラ グ 
プラ ン ケ ン を 撃っ た 数 

ガル デン ジン の 弾 の 動い た 数 
ガル デン ジン の 弾 を 当て た 回 数 
弾 の 連射 で きる 数 

ボー ナス 点 

ボー ナス ・ カ ウン タ 
HIT MAN の X, Y 座 標 
時 間 

ライ フル の フラ グ 

ガル デン ジン の 初期 を し た か の フラ グ 
ガル デン ジン の フラ グ 

ガル デン ジン の 出 て 〈 る 時 間 
HIT MAN の キャ ラ 番 号 

敵 が 乱数 で 動 《 か 追い か ける か の フラ グ 
ライ フル を 取っ た フラ グ 
瑞 が 弾 を 撃つ 確率 

ジョ イス ティ ッ ク 番 号 
デモ ・ フ ラグ 
足 ぶ み の フ ラグ 

ガル デン ジン が 出 た か 
ステ ィ ッ ク 変 数 
名 前 


ppPC-15OO ユ ー ザ ー の 皆さん へ . 最近 PC-12 シ リー ズ に 負け て いる よう な 気 が し ませ ん か ? パソ コン 雑誌 に よく 出 て くる の は 必ず と いっ 
て PC-1251 で す . PC-12 シ リー ズ よ ょ より, PC-1500 の 方 が , 性 能 が よい も の だ と 思う の で す . マシ ン 語 だ っ て , PC-12 シ リー ズ よ り わ か りや す 
v. も っ と ユー ザー 同志 頑張 っ て , PC-12 シ リー ズ に 負け な い プ ログ ラム を どん どん 作っ て いき 。 PC-1500 を も り 立 て て いこ うじ ゃ あり ませ 


⑥ テ ー プ を 巻き 戻し . リス ト 1 の プロ グラ 
ム を ロー ド , RUN し ます . 正常 な ら ば , 
この 後 マ シン 語 , オプ ジェ クト を ロー ド し 
て ゲー な が 和み ーー ト し えす 。 うう あら の 生研 
か っ だ だら, それ ぞ れ の リス ト を 見 直し て , 
も う 一 度 初め か ら 行 な っ て みて 〈《 だ る い . 


画面 を みて わか る よう に , お な じみ の シ 
а А ғ ム で : す ああ ТЕ 
"HIT MAN" С, カー ソル ・ キ ー で 4 方 
I 合 へ 動か し ます . ライ フル の 発砲 は , 
[SPACE| キ ー で す . 

敵 ( ギ ャ ング ス ・ プ ラン ケン ) を 撃っ て ク 
リア する も の で す . 下 の FUEL が 黄色 の 線 
まで 減る を と ガル デン ジン が 出 ま す . この が 
ルデン ジン は ミサ イル を 8 方 向 に 撃っ て き 
id. その ミサ イル を よ け な が ら 。 ガル デ 
ンジ ン に 10 発 弾 を 当て る と 。 ライ フル が 現 
われ ます . その ライ フル を 取る と , 弾 が 3 
発 連 続 に 撃て る よう に な り ま す . 

ШКХ 2 発 弾 を 当て な けれ ば な り ま せん . 
届 を (ギャ ング ス ) 1 発 撃 つと プラ ン ケ ン に 
変わ り ま す . Е 

2 面 む せき に BONUS ROUND が あり ます . 
COLE, ミニ チュ ア の 家 に 隠 き る きれ て いる 
ライ フル を 取っ て くだ さい. 中 に ガル デン 
ジン が 隠れ て いた 場合 .、 その 後に 見 付け る 


よう や く ラ イフ ル を 出す こと に 成功 


ライ フル が 2 倍 の 得点 に な り ま す 。 そし て , 
ギャ ング ス が 現われ る と お し まい で す . 
HIT MANR: 5。000 点 で 1 人 増え ます . 


JH 


お そら く こ れ 以 上 の プログ ラム の 追加 は 無 
PUUZ2. CUBE ADEM 
he AMETE を だ せい て も よう 。。 また , 
判断 サブ ルー チン の アル ゴリ ズム が 悪い の 
Ce ek あま よい テイ ネト ャ ルー チン に な っ 
て いま す 。 今 の 5, 6 倍 の 速 き に する こと 
が 可能 で す が 。 今回 は や り ま せん で し だ . 
キャ ラク タ で す が , 最初 は デー タ 文 か ら 2 
次 元 配列 に デー タ を 読み 込む 方 法 を と っ て い 
た の で す が , 主 な キャ ラ だ け で 47 個 メ 24 バ イ 
ト も メモ リ を 食っ て し まい , メモ リ 不 足 に 


ュ ン パイ ル す る と メモ リ が ギリ ギリ で す 。 


pio 


な っ た の で メモ リ に デー タ を 格納 し て , 直 
接 V-RAM に 転送 する 方 法 を 採り まし ただ. 
メモ リ も 使わ な 


この 方 が スピ ー ド も 較 く 。 
ぃ の で 良い 方 法 で す 。. 


プ ブログ ゲ グラム が 開 湊 に つて し まっ お 今 : と 
が も まず >: $75 
ぬこ と が あり ます が , 


何で も な い の に 死 
判断 ルー チン の 未熟 


С, どう し て も ぼく に は 分 か ら な い 謎 の 死 


が 起き ます . 

デモ ・ プ レイ で , HIT MAN が 2 
つ に 分 裂 す る こと が あり ます 。. 
ら は 直る は ず で す . 


21. 


これ は 次 か 


プロ グラ ム の 変更 は で き な い と 考え て い 


^ue ait POS ыл. 1A 


も て рО 


と いう 人 は , デモ を 一 部 抜か し て , ブロ グ 
ラム を 削っ て か ら や っ て くだ さい . 


CLEAR 文 は 必ず 実行 し な い と, 


クタ が 一 部 変 に な っ て し まい ます . 


Ж, 


ЯН 'b' ptt' 5 Su. 3 U T. 


Tor» 


キャ ラク タ を 作っ て くれ だ 第 の 温 


777 1 ДЬ. 1 ІР ВА5ІС ИЛ, ы... 


5 CLEAR 10,&HD9DF 

10 SCREEN 1,1,1:COLOR 1,,1:CONSO 
LEO,15,0,0: CLS 

20 COLOR ЗіРКІМТ "жжЖжя<“<<< HIT M 
AN Ver 1.0 PDD DHE" 

22 PRINT "By Nukui Hideyuki. ": РК 
INT "TEL 0274 (42) 4335/7345" 

24 PLAY "L8CDE-FG-2L64G84-GA-GA-G 
5-62","L803CO2BA-GF +21 466666666 
52 " 

30 COLOR 1:PRINT "READING ІРІ DA 
ТА" : GOSUE 100 

31 IF PEEK(&HFD1B)«2Q THEN 31 

32 SOUND 1,2: SOUND 3,3: SOUND 5,4 
: SOUND 0,0: SOUND 2,0: SOUND 4,0 
さる SOUND 8,16: SOUND 9,10: SOUND 1 


ы. | Т А 2 ніт 


р9Е0:88 
D9E8: Аё 
D9FQ: 40 
D9F8:88 
DAO: Аё 
DAO8: 88 
DA10: 88 
DA18: Аё 
DA20: 88 
DA28: 88 
DA30: Аё 
DA38: 40 
DA40: А2 
DA48: A5 
DA30: АВ 
DAS8: А2 


DA60: AS 
DA68: АВ 
Dn7 の : 88 
DA78: ^6 
DA80: 88 
DA^88: 88 
DA90: ^6 
DA98: 88 


(PC-1500 フ ァ ン クラ ブ 会 員 N.T) 


0,10: SOUND 11, 20: SOUND 12, 20: SOU 
ND13,10 

40 PRINT :PRINT "LOAD CHR DATA": 
EXEC&HF87C 

45 PRINT :PLAY "OL6ACDE-2E«*4R64E 
FG2","O2L6ACDE-2E*4R64EFG2" 

46 IF PEEK(&HFD1B)4»0 THEN 46 

47 SOUND 1,1:S0UND 3,2:SO0UND 5,3 
:SOUND 0,0: SOUND 2,90: SOUND 4,0 
48 SOUND 8,16: SOUND 9,10:SOUND 1 
0,10: SOUND 11,20: SOUND 12,20: SOU 
ND12,10 

50 PRINT :PRINT "LOAD MAIN PROGR 
AM " 

&@ PRINT :PRINT :PRINT "RUN":LOC 
ATE 0,10: POKE&HFAZO, 13: CLOAD 


DAAD: А2 
DAA8: А2 
DABO: АВ 
DAB8: A2 
DACØ: А2 
DAC8: 40 
DADØ: A2 
DAD8: 22 


DAEQ: АВ 
DAES: A2 
DAF Ø: 22 
DAF8: 40 
рвоб: 02 
DEØ8: の 
DE10: 2A 
DE18: 02 
DE20: 2A 
DB28: 2A 
DBR30: AA 
DE38: AD 
DE40: 9E 
DB48: АВ 
DESO: 95 


70 END 


100 FORI-&HF878TO&HF8D1 з READA$ 
110 FOKEI,VAL ("&H"*4$) : NEXT 


120 RETURN 


130 DATA14,C3,06,1B,CD,94,25,0 

140 ГАТА05,Ср,70,14,ҒЕ,АҒ,20,Ғ7 
150 DATA10,F7,21,32,F8,06,06,CD 
160 DATA70,14,77,23,10,F9,CD, O6 


1170 рАТА1В,АҒ,52,58,Ғ8,21,76,25 


180 DATACD,CF,30,21,36,F8,CD,CF 
190 DATA30,CD,94,25,24,32,F8,ED 
200 DATA4B,34,F8,1E,00,CD,70,1A 
210 DATA57,83,5F,72,23,0B,78,B1 
220 DATA20,F3,CD,70,10,BB,CA,A^A 
250 DATA108,CD,06,1B,21,85,03,C3 


240 DATACF , 30 
MAN хи ЈА БОЕ. 


0858: 95 


DEGO: 55 
DB68: 66 
0670: 6F 
DB78: ^A 
DESO: 99 
DE88: 95 
DE90: ^8 
DB98: 03 
DEAD: Ав 
DBA8: AØ 
DEEQ: 94 
DBB8: B8 
DECØ: AØ 
DBC8:9^ 
DED の : 78 
DBD8:E1 


DEE の : 01 
DEES: B1 
DEF の :i 80 
DEF8: 95 


pio 


リリ スト グ HIT MAN マシ ン 語 リス ト 


DC の の: ЕВ 
DC の 8: 80 
DC1 の : 95 
DC18:EB 
DC20: AA 
DC28: AA 
DC30:8 
DC38: AA 
0С40:Е9 
DC48: E8 
DC5 の : の の 
DCS8:14 


DC60:15 
DC68: AA 
DC70: А9 
DC78: AA 
DC80: AA 
DC88:A5 
DC90: AA 
DC98: AA 
DCAQ0:4^7 
DCA8: А9 
DCEO: AA 
DCB8: A9 
DCCA: AA 
DCC8: AA 
DCD の :i 9А 
срв: AA 


DCEQ: AA 
DCEB: SA 
DCFQ: AA 
DCF8: АА 
DDØØ: 76 
DD の 8 : 94 
DD10:AA 
DD18:A5 
DD20: AA 
DD28: AA 
DD30:99 
DD38:9?9 
0040: AA 
DD48: 94 
DDS0: 95 
DDS8: AA 


NENNEN ЛА ЪЗ HIT MN ソー ス ・ リ スト 


GOSUBR 6650 
REM жж oat セリ テイ 3XXX*3* 
SCREEN 1,2,1 
SCREEN 5,2,1: COLOR 2,5,1 
CONSOLE 0,16,0,0:CLS 
SCREEN ,,2:GO0SUB 4020 
DEF FN A(CI) &HE200-*-X*192*Y 
Х=0: Ү=0: МФ="00 YOU WANT USE J 
STICK":GOSUB 6180 
Y=2: X20: M$-"PUSH Y OR ANY KEY 
"160508 6180: OUT&H93,3 
100 Ј5=0: АФ=ІМКЕҮФ: ІР АФ-"" THEN 
100 
110 IF A$-"y" THEN JS=1 
120 CLS: 6050В 4090: БОТО 130: REM 
»»» DEMO 1 
125 GOSUB 5400: КЕМ >>> DEMO 2 
150 GOSUB 2870: GUSUB 5630: КЕМ >> 
>5ТАКТ 
140 БОБОВ 2900: GOSUB 3570:REM >> 
2CLEAR 
150 GOSUB 2930:REM YD 
160 GOSUB 6370 
170 REM mex MAIN 39333 33€ 
180 GOSUB 840:REM 727"z 
185 GOSUB 510: КЕМ МАМ 4h"? 
190 IF TI«G AND GU-Q AND бЕ=@ АМ 
D G220 THEN GOSUB 990: КЕМ ЛА” 
877,7; 
200 IF GF-1 THEN GOSUE 990 
210 IF GU=1 THEN Х=15: Ү=15: №47: 
GOSUB 6750 
220 FOR 1=1 TO LS 


SAO О, (O) 
Ps v 


いや ー- 3 月 号 の Tiny Break Block, 素晴らし いで す / ノ 
1 表示 部 が 小さき い の で 見 に くい / 
番地 を 変え る と キー 操作 が 変わ り ま す . 


DD6 の : 99 99 95 99 99 99 99 99:С4 
рр68:95 95 АА АА АА АА АА AA: 26 
0070: АА АА АВ АА Ай 2A А4 6А: 7Е 
0078: 41 2A Ай 2А АЗ 2А АҒ ЕА: ЕВ 
080: А0 2А АА АА Аа АА АА АА: Сё 
0088: AA АА АА АА AA ВА Аа 12:98 
DD9 の : RB OE Ай ЗЕ 80 02 A ВА: со 
0098:А0 2А АВ АА АА АА AA АА: C4 
Град: АА АА Аа АА АА АА АА АА: 50 
ррАВ: AO 4А AØ 12 Ай 02 ng ЗЕ: 1С 
DDE の : AO OE AA АА AA АА AA АА: АА 
DDE8: AA АА АА АА АВ АА ñQ 2А: С4 
DDC の : д0 Q^ 80 02 AO 06 АВ 52: АС 
DDC8:AA^ ØE АА BE АА АА АА Аа: 58 
DDD の : AA АА АА АА АА AA AQ 2А: Сё 
DDD8:AØ 2А AQ 2А А4 6A А1 2А: р 


DDEO:AQ 2А АҒ ЕА AB АА АА АА: ОС 
ГЕВ: АА АА АА АА АА 2А АВ ВА: 2Е 
DDFO: AO ØA 80 02 90 ØA 80 2А:70 
DDF8:BC АА B2 АА АА АА АА АА: éA 
ПЕ00: AA АА АА АА АА AA АА Аа: 50 
DEOS8:^1 ØA 84 ØA 80 ØA BC 0А: 85 
DE10: BO ØA AA АА AA AA АА АА: Bé 
DE18:ñA AA AA АА А2 AA 84 АА: 22 
DE20: BO 2А BC ØA 80 02 AØ OA:CC 
DE28: A8 ØA АА 2А АА АА AA AA:2E 
DESQ:AA 2А АА 22 00 ØA 55 57:56 
DES8:00 16 А2 52 AØ 32 АА 32:98 
DE4Ø:AA 32 AA 52 АА 52 АА 02:40 
ПЕ48: АА 95 99 99 99 99 99 99:D5 
DESO: 99 99 95 АА АА Аё 96 Аё: Ер 
DES8:A6 AG AG Аё AG Аё 95 АА: 25 


memme somme comme meme s r ーー n ーー ーー ーー ーー n ーーー n p n ーー‏ ممت مم seeme‏ م 


DEGØ:AA Аё 99 99 А9 А9 А6 9А:14 
DE68: 5А 9A 95 АА АА Аё 99 99:F5 
ПЕ70: А9 Аё A? А9 99 99 Аё AA:23 
DE 7B: АА А9 99 99 99 99 95 А9: Е5 
ЕВО: А9 А9 А9 АА АА 95 94 94:18 
DE88:7A 96 А9 A? А9 99 Аё АА: 14 
ПЕ50: АА А6 99 99 94 96 99 99:Е4 
DE98:99 99 A6 АА АА 95 99 99: FS 
DEAQ:99 A9 А9 А9 А9 А9 A9 AA:39 
ПЕАВ:АА Аё 99 99 99 Аё 99 99:Е5 
DEBO:99 99 А6 АА АА 95 99 99:F3 
DEB8:99 95 А9 А9 А5 А5 Аё AA:22 
DECO:AA Аё 99 99 99 95 99 99』E2 
DEC8:99 99 99 АА АА 96 99 99:E7 
DEDO:99 96 99 99 99 99 96 AA:D3 


2350 S-C 

240 TR-STRIG(JS):C-STICK (JS) 

250 IF C0 OR C=2 OR C=4 OR С=6 
OR C8 THEN C-S 

260 IF С=@ THEN С=5 

270 IF ТК=1 AND TF(I)=Q THEN41 の 
280 IF TF(I)-1 THEN GOSUB 880: КЕ 
M Tw? 

290 NEXT 

500 FOR Ізі TO 3+LV: X=TX(I):Y=T 
YI) 

510 UG=U1 (I1) : M=M1 (1) 

320 ON F1 GOSUE 710,1400: КЕМ テキ イィ 
М” 

550 U1(I)-UG:M1(I)-M 

540 TX(I)2X: TY(ID)zY:NEXT 

S50 IF F-1 THEN GOSUB 660 


560 REMGOSUB S10:REM МАМ +h" 
370 GOTO 1470 


380 БОБОВ 1750 

390 EXEC&H274D: Iz2: SOUND 7,5: 60 
TO 180 

400 REM жжжжж 92 vaf XXxXX3X33333* 
410 SOUND 7,48: SOUND 8,16: SOUND 
0,20: SOUND1,0: SOUND 9,0 

420 SOUND 6,0: SOUND12,6: SOUND 11 
,299: SOUND 15,0 

50 Х-МХ:Ү-МҮ 

440 TF (I)=1:H1 (І) =С 

450 ЈХ (І) =Х:ЈҮ(І) =Y 

460 GOSUE 880 

470 М=ММ: Х=МХ: YzMY: GOSUB6750: I=2 
480 IF DEMO-1 THEN RETURN 


Р.5.3 柳沢 一 / 


思わ ず 燃 を て し まい まし だ (で も ちょ っ と スピ ー ド が 速 す ぎる の で は … ? ). 
と 思っ だ た 人 は , 中 めがね を 使っ て 大 きく 見 える よう に 上 [に 夫 を し まし ょ 2 う . 
オォ オレ だ よ / FAOURI k # 


DED8: AA 
Sum: 18 


DEEQ: 99 
DEEB: 99 
DEF Ø: AA 
DEF8: 9A 
рғ00: 9A 
DF の 8: АА 
DF 1 の : 99 
DF18:99 
DF20: AA 
DF 28: Аё 
DF 30: А9 
DF 38: АА 
DF 40: 99 
DF48: 9A 
DFSO: АА 
DFS58:99 


Sum: 05 


DF 6 の: 95 
DFA8: AA 
DF7 の : 99 
DF78:99 
DF80: AA 
DF88: 96 
DF9Q: 99 
DF98: AA 
DFAQ: A9 
DFA8: А6 
DFBO: AA 
DFB8: 99 
DFC の : 99 
DFC8: AA 
DFD0: 95 
DFD8: 99 


DFE の : AA 
DFE8: A6 
DFF の : A6 
DFF8:7F 


490 GOTO 290 
500 REM ssa МАМ イト "の 933333 
510 STzSTICK(JS) : X=MX 』 Y=MY 
520 IF 5Т-0 THEN 630 
S30 GOSUBR 6810 
540 IF ST-1 THEN Y-zY-1:NM-9 
550 IF ST-3 THEN XzX*1:NM-5 
560 IF ST=5 THEN YzY-*1:NM-1 
570 IF ST-7 THEN Х-Х-1:ММ-7 
580 IF 15-5 AND (ST=1 OR ST-5) Т 
HEN NMzNM-*2 
590 IF X«2 THEN X=2 
600 IF Х>2ВТНЕМ Х=28 
610 IF Y ぶ 2 THEN Y=2 
620 IF YE:2BTHEN Y=28 
50 N-NM-F:GOSUB 6750 
640 MX=X: MY=Ys RETURN 
650 REMs3ss«« TIME d3)mqQi2ex 3€ 
660 IF ТІ>ті THEN TI-TI-1 
670 IFTIZOTHENTI--1:F1-22:PLAY"V1 
SL8o8cró64cr&64cró64cr6Acr64cr 64" :R 
ETURN 
680 LINE(SO*TI,184) -(50*TI,192), 


bd 
E 


690 RETURN 

700 REM ss FF ゴト "の (2) жекке 
710 IF 06>-0 ТНЕМ740 

720 M=INT (RND (1) #4) +1 

730 UG=INT (RND (1) #7) +1 

740 Z=1:GOSUB 6810 

750 GOSUB 2010: 2=2 

760 IF X«2 THEN M=2: GOTO 750 
770 IF X»528THEN M=4: GOTO 750 


(OVERLAP) 


P.S; 
P.S.2 &C2B9 ЕШ L &C2C7 


780 IF Ү<2 THEN М=5: GOTO 750 
790 IF Y»528THEN M=1: GOTO 750 

800 UG-UG-1 

810 N=20+F+N1 (І) sz Б050В 6750 

820 RETURN 

ӨЗ@ REM3ss3** LhR/727"Z +++ 

840 IF F-Q THEN F=i: БОТО 860 

850 Е=@ 

860 RETURN 

870 КЕМжжжжж マー イト "の xXX3*333* 

880 X=JX(I):Y=JY(I) 

890 GOSUB 6810 

900 IF Hi(I)=1 THEN YzY-2:N-28 

910 IF H1(I)-3 THEN X=X+2:N=29 

920 IF H1(I)=5 THEN Ү=ү+2: №50 

950 IF H1(1)-7 THEN Х=Х-2: №51 

940 IF X«2 OR Х>28 OR Y«2 OR Ү>2 

8 THEN ТЕ (І) =0: RETURN 

9S0 IF 15-5 THEN N=N+4 

960 GOSUR 6750 

970 ЈХ (І) =Х: ЈҮ(І) =Y: RETURN 

980 REM s3s3s* GALDENZIN ose 
990 G2=1: IF G9-z1 THEN 1140 

1000 SOUND 1,0:SOUND Ө, 110: SOUND 
8,10: SOUND 3,0: SOUND 2,111: SOUN 
D 9,10 

1010 SOUND 7,56: SOUND 5,0: SOUND 
4,112: SOUND 10,10 

1020 G9-1:FOR X228 TO 16 STEP -1 
1050 Y=15: N=26: GOSUB 6750 

1040 FOR I-Q ТО 500: МЕХТ 

1050 GOSUB 6810: NEXT 

1060 GF-1:N-227:GOSUB 5750 

1070 FOR X-17 TO 28 

1080 N-25:GO08UBR 6750 

1090 FOR І=0 TO 500: МЕХТ 

1100 GOSUB 6810:NEXT 

1110 FOR 1=8 TO 10: SOUND 1,0:МЕХ 

T 

1120 GOSUB 1320:GT-11 

1150 REMーーーーーーーーーーーーーーーーーーーーーーー 
1140 GT-GT-1:IF GT<Ø THEN BT=1 の = 

GOSUB 1500 

1150 X=15: Y=15: N=22: 6050В 6750 
1160 FOR Ісі TO 8:X=GX(I):Y=GY(I 
) : GOSUE 6810 

1170 ON I GOTO 1180,1190,1200,12 
1 の 。 122 の 。 12 さ の 。 1 24 の 。 1 25 の 

1180 Y-Y-1:GOTO 1260 

1190 Y-zY—-1:Xz-zX-*1:GOTO 1260 

1200 X=X+1: GOTO 1260 

1210 X=X+1:Y=Y+1:GOTO 1260 

1220 Y=Y+1:GOTO 1260 

1230 ҮсҮ%1:Х-Х-1:060Т0 1260 

1240 X-X-1:GOTO 1260 

1250 X=Xー1 』 Y=Yー1 

1260 N-38-«I:GOSUB 6750 

1270 GX(I)=X:GY(I)=Y 

1280 NEXT: RETURN 

1290 REM --------------------- 
1500 FOR Ісі TO 8:Х-бХ(1):Ү-бҮ(І 
) 

1310 GOSUB 6810:NEXT 

1320 X=15: Y=15: №27: 6050В 6750 
1330 RESTORE 1380: SOUND 7,7:PLAY 
"V 10C16" 

1340 FOR J=1 TO 8 

1550 READ GX(J),6GY(J) 

1560 X=6X (J): Y=6Y (J) :N=22: GOSUE 

6750 

1370 NEXT:RETURN 

1380 DATA 15,13,17,13,17,15,17,1 

7419,17,13,17,134,1594,1324, 413 

1590 REM s«x* FF ゴト "の (3) жы 
1400 GOSUB 65810 

1410 X=X+SGN(MX—X) 

1420 Y=Y+SGN (MYーY ) 

1450 М=20+Е +31 (І) : 6050В 6750 
1440 RETURN 

1450 REM жжжжжж リフ ウー SUB sss 
1460 REM ---- テキ ニア クッ タカ ? ーーーーーー 
1470 FOR I2--1 TO 1 

1480 FOR J2--1 TO 1 

1490 FOR K-1 TO 3*LV 

1500 IF TX(K)+I2=MX AND TY (kK) +Ј2 

=MY THEN 2590 

1510 IF DX(K)+I2=MX AND DY(K)-4J2 

=MY AND TJ(K)-1 THEN 2390 

1520 NEXT 

1530 REM - "7"25"5/79324-?9?9» - 
1540 FOR К-і TO 8 


1550 IF GX(K)+I2=MX AND GY(K)*J2 
=MY AND GF-1 THEN 2590 

1560 NEXT 

1978 REM.-— NW AT" ov" 22794999 mm 
1580 IF 15+I2=MX AND 15%02-МҮ АМ 
D GF=1 THEN GOSUB 2590 

1599: REM <=. 299" 9227290999 - 
1600 FOR K-1 TO LS 

1610 FOR Кісі TO 3*LV 

1620 IF JX(K)*I22TX(K1) AND JY(K 
)+J2=TY (K1) AND ТЕ(К) =1 THEN 214 
2 

1650 IF 15+I12=JX(K) AND 15+J2=JY 
(к) AND GF=1 AND TF(K)21 THEN GO 
5082450 

1640 NEXT: NEXT: NEXT: NEXT 


1660 IF GU-1 AND MX=15 AND MY=15 
THEN GOSUB 2630 

1670 IF DEMQO-1 THEN RETURN 

1680 IF MD= の AND 5С>500 THEN GOS 
UB 1710 

1690 GOTO 380 

1700 REM*33354€ 1 リフ エダ qsxxxX**** 
1710 NK-zNK*1:GOSUB 6460 

1720 PLAY "V12Ló64CEGEC":MD-1 
1750 1 ІМЕ (50+ТтІ, 184) – (200,191) 。 さ 
,BF : RETURN 

1740 REM ххх テキ ノダ ガマ xxxX**** 
1750 FOR Ісі TO 3*LV 

17580 IF ТЈ(І) =1 THEN GOSUB 1810 
1770 B-INT(RND(1)*TkK) 

1780 IF В=@ THEN TJ(I)=1 

1790 NEXT:RETURN 

1800 

1810 IF Т5(І)-і THEN 1880 

1820 X-TX(IOs:Y-TY(I) 

1850 M=M1(I):TS(I)=1 

1840 N-20-*F:H(I)-M 

1850 X=TX(I):Y=TY(I):GOSUB6750 
1860 TH(I)=M1 (I) 

1870 DX(I)=X:DY(I)=Y 

1880 

1890 X=DX(I):Y=DY(I) 

1900 GOSUB 6810 

1910 M-TH(I?:GOSUBR 2010 

1920 IF X«4 OR X225 OR Y«4 OR Y> 
25 THEN TS(1) =0: TJ CI) =0: RETURN 
1950 N-28-H(I)-1:GOSUB 6750 

1940 ОХ (І) =Х: рҮ(І) Y: RETURN 

1950 REM жж ЦОН TITIR ** 
1960 FOR Ісі TO 8:X=6X (І) : Y=6Y (І 
) 

1970 GOSUE 6810: NEXT 

1980 X=15: Y=15: GOSUB 6810 

1990 RETURN 

2000 REM *J* ママ メス X333 3334333 
2010 ON М GOTO 2020, 2030, 2040, 20 
202 

2020 Y=Y-Z: GOTO 2060 

2050 X=X+Z:GOTO 2060 

2040 Y=Y+Z: БОТО 2060 

2050 XzX-Z 

2060 RETURN 

2130 КЕМ ###* GIANGS PIL? xxxx*x* 
2140 X2JX(kK)s:YzJY(K): TF(R) =0: IF 
QRT(K1)=1 THEN 2230 


2150 SOUND 0,18: SOUND 1,5:S80UND2 


;,12: SOUND 3,4: SOUNDB8,16: SOUND 7, 
56 

2160 SOUND9,16: SOUND 12,5: SOUND 
11,20: SOUND13,0 

2170 АТ(К1)-1:5С-5С%5 

2180 GOSUB 6810 

2190 X=6: Y=Q: GOSUB 6290 

2200 X-TX(K1):YzTY (K1): №37: GOSU 
B6750 

2210 FOR I1-0 TO 2000:NEXT: GOSUB 
6750 

2220 N1 (K1)=3: GOTO 1630 

2250 SOUND 1,0: SOUND 2,2: SOUND 8 
ぅ 1 の :FUR I=@ TO 255: SOUND Q,I:NEX 
T 

2240 SOUND 8,0 

2250 X=6: Y=Q: SC-SC*8: 5605086290 
2260 Х-ТХ(К1):Ү-ТҮ(К1) : №56: 6050 
В 750 

2270 FOR I1-0 ТО 1000: NEXT 

2280 №58: GOSUB 6750 

2290 FOR I1-0 TO 2000: МЕХТ 

2500 АК=АК+1: АТ (К1) =0 
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2510 IF АК>10 THEN 2700 

2520 GOSUB 6810 

2550 X-JX(K):Y-JY(OK):GOSUB 6810 
2540 TX (K1) =INT (RND (1) #27) +2 
2550 TY (K1) =INT (RND (1) #27) +2 
2360 GOSUB 2372 

2370 N1(K1)-20:GOTO 1650 

2371 REM* テキ カ " シュ ツケ "シシ タ ト キ ノ テ ンー メリ ж 
2572 SOUND7,56:FOR Ісі ТО 4:X=TX 
(K1): YTY(K10:N7221: GOSUB 840: GOS 
UB 6750 

23573 PLAY "Sg の M1 1 の の Q+16" 。 "SAM1 1 の の 
C16":GOSUB 510 

2574 CzSTICK(JS):S-C: IF C=@ THEN 
C-S 

2575 FOR 2-0 TO 1000:МЕХТ:С-5ТІС 
K(JS):SzC:IF C-Q THEN С=5 

2576 X=TX (K1): Y=TY (K1) : GBDSUE 840 
: GOSUB 6810:PLAY "A*16","C16" 
2578 GOSUBS10:FOR J-Q TO 1000: МЕ 
XT: NEXT: RETURN 

2580 REM #жжжжж ヤラ レグ ! xx**33* 
2590 SOUND 7,56:PLAY "TV1OO4L8GF 
*FS10M3OQE2","V1OTLS8OS3GF *FS10M30 
DE2" 

2400 FOR 11=0 TO 10000: NEXT 

2410 Х-МХ:Ү-МҮ 

2420 N-36:GOSUB 6750 

2430 FOR I=@ TO 5000:МЕХТ 

2440 NK-zNK-1 

2450 IF NK--1 THEN 5060 

2460 IF DEMO-1 THEN RETURN 

2470 GOTO 150 

2480 REM ж クッ マカ" カルテ" シシ "ソニ アク ッッ グ ж 

2490 65=65+1:ТЕ (К) =0 

2500 X-z65:Y-20:SC-SC-1:GOSUBRB 6290 

2510 SOUND 1,0: SOUND 8, 10: SOUND 

7,56:ҒОК Ісі TO 5 

2520 FOR 2-0 TO 255 

2550 SOUND 0,2 

2540 NEXT:NEXT: SOUND 8,0 

2550 Х=ЈХ (К) 』Y=JY( ド ) : BUSUB 6810: 
X=15: Y=15: GOSUB6810 

2560 IF 6510 THEN RETURN 

2570 SOUND 7,56:PLAY "V12L64CGE" 
,"V12L64GCC" 

2580 N-47:X-15:Y-15:G0SUBR 6750 

2590 GU-z1:GF-0:GOSUB 1960 

2600 SCzSC-50:X-6:Y-0:GOSUB 6290 

2610 65=0: RETURN 

2620 REM *** テリ ホ "の Су? жы 

2650 IF 61=1 THEN RETURN 

2640 SOUND 7,S56:PLAY"L64CDEFGABO 

SCO4BAGFEDC" , "L6403CDEFGABOACOSEB 

AGFEDC" 

2650 LS-3 

26600 GF-0:6G1-71:GU-0 

2670 SC-SC*10:X-6: Y=0: 56050862950 

2680 RETURN 

2690 REM xxx MEN CLEAR жены 

2700 SOUND 7,42: SOUND 6,0:1 ОСАТЕ 
3,6: COLOR 4:PRINT "Very Good" 

2710 Рі АҮ"Т25550м4000", "+2551", " 

t255V12L":A$-"O3CO2G": ВФ="О2ЕС" 

2715 A$-4$*4$:B$-B$-B$ 

2720 PLAY "OSOMAOOQUT2SSLSEA4.DCA4E 

4GFFEDA4R","sO0m400O0RCRCRCRC" ,A$*A 

$ 

2750 PLAY "F4.ED4FA4AGGFEA4R" , "КСК 

CRCRC" , B$+ñ $ 

2740 FLAY "G4.GGA4CA4FEFGA4" , "RCRC 

КСКС",4%%В% 

2750 PLAY "IS8EEFEDFEDC4", "'RCRCRC 

RC" ,"DGDGOSCA4E4C4" 

2760 Xz8:Y-z16: M$-STR$ (ME) +" ROUN 
D CLEAR": GOSUB 6180 

2770 ME=ME+1 s し ソ = し ソ +1 』 IF ІУ>-3 TH 
EN LV=0 

2780 TK-TK-1:IF TE くさ THEN .TK=1 の 
2790 X27:Y-18:M$-"BONUS"«*STR$ (Т 
1#10) +" POINTS": GOSUB 6180 

2800 X=6: Y=Q:FOR I-TI TO @ STEP 
ー1 

2810 SC=SC+ 1 : Б050В 6290: LINE (50+ 
I,184) - (50*1,191),3 

2820 NEXT: SOUND 7,56 

2850 EXEC&H2SES: BzVAL (RIGHT $ (STR 
$ (ME) 。1 ) ) 

2840 IF В=5 OR B=6 OR B=9 THEN G 
OSUR 5540 

2850 GOTO 140 
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2860 REM * zat 1 (GAME START) ж 
2870 SC-0:NK-3:2-z2: МЕ=1 : 65=0: 50= 
Q:LV-O: М0=0: ТК=10 

2880 RETURN 

2890 REM * zat 2 (МЕМ CLEAR) жж 
2900 Ak-1:GT-z0:6G5-0:62-0 

2910 RETURN 

2920 REM sx boat 5 (ヤラ レダ) жж 
2930 2=2:15=1:МХ=2: МҮ=2 

2940 FOR 1=1 TO 5 

2950 ТХ(І) =26:ТҮ(І) =26 

2960 Т5 (1) =0: ТЈ (І) = の 

2970 Ох (І) =26: DY(I) =26: М1 (І) =0 
2980 АТ (І) = の 

2990 МЕХТ 

5000 Т1=151:60=0: ロウ テウ: 6Ғ=0 

5010 G=INT (RND (1) #70) +80 

5020 мМ=5:Е1=1:(52=@:(51=@ 

5050 FOR Ісі TO 3S: TF (I)=@:NEXT 
3040 RETURN 

5050 REM жжжжж GAME OVER жже 
3060 CONSOLE 1:LOCATE 3,7:COLOR 
2:PRINT "GAME OVER":SOUND 7,56 
3070 FLAY "LT200S0M1000005E2.FG2 
.EC202G1","LT200S0M1000004C1C1F2 
F21” 

5080 PLAY "F2.ED2F2E2C2D1","Q361 
G104C10361" 

5090 PLAY "OSE2.FG2.EC242G1","04 
С1С1Е2Е2С1" 

3100 PLAY "D2.EFFEDC2E2C1","Q361 
G104C2036204C1" 

3110 EXEC&HZ2SES: EXEC&H2S5E5: CLS 
5120 IF 5С>Н5(5)ТНЕМ GOSUE 2220 
S130 X-30:Y-14:N-7:GOSUB 6750 
3140 FOR I-3 TO 11 

5150 SOUND 7,7: 500Мр 6,1:500М0 8 
16: SOUND 12,10: SOUND 15,0: 12=2 
3160 FOR 11=14 TO I STEP -1:ñ*$= 
MID$("GAME OVER",I-2,1) 

3170 LOCATE I2,7:COLOR3:FRINTA$ 
3180 LOCATE I1,7:COLOR2: РКІМТАФ 
5190 I2-2I1 


3200 NEXT:NEXT 
3210 EXEC&H2SES: SOUND 7,56: GOTO 


125 


5220 REM жжжж INPUT NAME 33333 

5250 CLS: COLOR 2:N$z"":IzQ:J-0O:E 

XEC&H1058 

3240 РКІМТ TAB(18)"GOOD PLAYER" 

3250 FRINT TAB(19)SC*10" PTS." 

3260 COLOR 4:PRINT :PRINT "INPUT 
YOUR NAME":RESTORE 5440 

5270 LOCATE 3,10: COLOR 1:РКІМТ " 

==========" s LOCATE 3,9: COLOR 2 

3280 І=1+1 

5290 READ A$,B$:1F A$-"N" THEN К 

ESTORE 3440:READ A$, B$ 

5500 PLAY A$,B$ 

5510 J-J-1:0$-INKEY€$ 

5520 IF A$-" " THEN A$-"G":GOTO 
3350 

S330 IF A$>="Ø" AND А%<="9" THEN 
FRINT А%;:М%-М%ғА%: GOTO 3360 
5540 IF АФ<"а" OR A$»5"z" OR А%:" 
" THEN 3360 

5550 М1%=СНК®Ф (АС (АФ) - 52) : МФ=МФ+ 
N1$:PRINT N1$; 

5560 IF LEN(N$)»9 THEN 3400 

3370 IF J»500 THEN J=0: GOTO ささ 9 の 
S380 GOTO 3310 

5590 IF I<64 THEN 2280 

3400 LOCATE 7,12:COLOR 4:PRINT " 
ОК!" 

3410 FOR 1=@ TO 3:READ A$,B$:1IF 


АФ-"М" THEN RESTORE 3440:READ A 


$,B$ 

5420 PLAY A$,B$:NEXT:EXEC&HZSES 

3430 GOSUB 3480: RETURN 

5440 DATA TViOLOEE,TS8M19500CC,4 

A,CC,GG,CC,FE,CC 

5450 DATA DD。03GG 。 DD 。 BB 。EE 。 D4CC 。 

EE 

3460 DATA CC。EE 。CC 。AA 。 CC 。 BB 。 CC 。F 

E 。CC 。GB 。D さ BG 。 66, BB 。EE 。D4CC 。EE 。 CC 
N 

5 

3470 REM w*** SCORE 3L*27" w*** 
3480 1=1 

5490 IF HS(I)<SC THEN 3530 

5500 1=1+1 

5510 IF І<-5 THEN 5490 


皆様 , 初め まし て . 今年 JR-200 を 中 古 で 買っ た ば か り の 者 で す . 


5520 GOTO 5550 

5550 FOR 5-5 TO I STEF -i 

5540 HS (S) =HS (S—1) : NA$ (8) =МАФ (CS- 
1): NEXT: HS (І) =5С: МАФ (І) =N$ 

5550 RETURN 

3560 REM жжжжжж OPENING 39333 933 

3570 CONSOLE 0,16:CLS 

3580 LOCATE 4,7:COLOR 2 

5590 PRINT"ROUND"ME 

5600 FLAY "OTV1OLA564CDEFDEFGEFGAF 
GAB1","OSTV1OL64CDEFDEFGEFGAFGAE 
4:3) 

5610 EXEC &H2SES5:RETURN 

3620 REM жжжжж GAME START жж 

3630 CONSOLE 0,16:CLS 

3640 FOR Iz£&HE200 TO £&HF9FF STEP 


5650 FOR J=I+&H11 TO T+&H1F 

5060 POKE J,&HDD: FOKE 2%52,%Н77 

3670 NEXT:NEXT 

3680 LINE(126,0)-(255,191) ,4,B 

5090 FOR І-20 TO 140 STEP ¿Q:LIN 

E(190,1) - (220, 1+20) , 5, BF 

3700 LINE-(199,1),1,B:LINE(205,I 
)-(205,1420) 。 1 : NEXT: COLOR. 1: В=5 

3710 FOR I-2 TO 14 STEP 5:1 ОСАТЕ 
13,I:PRINT B;"F":B-B-1 

3720 NEXT:COLOR 2 

3730 LINE(1190,22) - (120,122) , 4,BF 

:LINE- (110,22) ,,B 

3740 LINE(122,30)-(126,35) , , BF 

5750 LINE(132,109) - (156,114), ,BF 

3760 LOCATE 1,2:РКІМТ "GAME";SPC 
(2)::COLOR 1 

3770 PRINT "Z"SPC(9)::COLOR 2:PR 

INT "START'"::COLOR 1 

5780 PRINT "-"SPC(15)"*"SPC(15)" 

i"SPC(15)"7"SPC(9); : COLOR 2 

5790 PRINT "fa9o/"SPC(2)::COLOR 1 

:PRINT "E"SPC (15) "F"SPC (9); 

3800 COLOR 2:PRINT "9-%“wh"g : COL 

OR 1:PRINT "w"SPC (25); 

3810 COLOR 2:PRINT "л. 337" 

3820 LINE(126,191)-(166,171) ,5,В 

F:iLINE-(140,191) ,,B 

3830 LINE(240,175) -(254,191) ,4,B 

Е:РЅЕТ (250,182) ,3 

3840 LINE(122,164)-(170,171) ,1,B 

F: SOUND 7,56 

5850 FLAY "V1 の DLT1 の の E-16D16C.DBE 

ー.F-BFBF+1" 。"V1 の LT19 の 0D さ GBD4C2D さ SE 

-2А2" 

3860 PLAY "L64T2550GA-GA-GA-GA-G 

A-GA-G2" 

5870 Y230:FOR X2-8 TO 18 

3880 GOSUB 840: N=20+F 

5890 FOR X120 TO 8 STEP 4 

3900 X-X2-X1:GOSUB 750 

5910 NEXT 

3920 FOR I=@ TO 1000:МЕХТ 

5950 FOR Х1=0 TO 8 STEP 4 

5940 X=X2ーX 1 : BDSUB 6810 

5950 NEXT:NEXT 

3960 X-18:Y-30:N-20:GOSUB 5750 

5970 LINE(0,80)-(105,150) , 3, BF 

5980 LOCATE 1,7:PRINT "74'5"SPC( 
12) "ナニ モグ ~ 

5990 X-0:Y-30:N-5:G60SUB 6750 

4000 EXEC&H2SES: RETURN 

4010 REM жжжжж SCORE Vaf эзен» 

4020 RESTORE 4060 

4030 FOR Ізі TO 5 

4040 READ HS(I),NA$(I) 

4050 NEXT: RETURN 

4060 DATA 500,РС 6001,400,NUKUI 

КОМ, 3 の の , HI TMAN 。 200 , COMP'AC 

4070 DATA 150,HIDEYUKI 

4080 REM HH HH ¥ HK ¥ ¥ DEMO 3333 3 ¢ 4 ¥ * 

4090 GOSUB 6460: CONSOLE 1 : CLS: RES 

TORE 4610:EXEC &H1058 

4110 SOUND 8,16: SOUND 13, 10: SOUN 

D 12,2:SOUND 11,255: SOUND 1,3 

4120 SOUND 0, 70:PSET (5,187) ,2 

4130 LOCATE 0,15 

4140 FOR І-0 TO 15 

4150 READ X,Y:LINE-(X,Y) ,2:NEXT 

4160 IF INKEY$-" " THEN RETURN 

4170 LINE(20,117) - (20,12) ,2 

4180 PAINT (10,150) ,4,2: PRINT 

4190 LINE(50,155)—(70,185) ,4,B:P 

SET (60,142) ,2 


4200 FOR Ізі TO 5 


4210 READ X,Y:LINE-(X,Y) ,2: NEXT 
4220 IF ІМКЕҮФ=" " THEN RETURN 
4250 PAINT (65,145) ,4,2:РАІМТ (65, 
165) ,2,4 

4240 LINE(65,142)—(55,12) ,2: PRIN 
T:PSET (100,144) ,2 


4250 FOR Ізі TO 16:READ X,Y 


4260 LINE- (X, Y) : NEXT 

4270 IF INKEY$-" " THEN RETURN 
4280 PAINT (105,144) ,4,2: PAINT (10 
5,155) ,1,2:PAINT (105,170) ,4,2 
4290 LINE(105,138) -(105,12) , 2: PR 
INT:PSET(130,185),2 

4500 FOR I-1 TO 5 

4310 READ X,Y:LINE-(X,Y) ,2:NEXT 
4520 IF ІМКЕҮФ-" " THEN RETURN 
4550 PAINT(140,150) ,1,2: LINE (148 
,156) - (148,12) ,2:PRINT:PSET (194, 
186) ,2 

4350 FOR I-1 TO 5 

4360 READ X,Y:LINE-(X,Y) ,2: NEXT 
4370 IF INKEY$-" " THEN RETURN 
4580 FAINT(190,155) ,4,2:L INE(190 
,142) - (190,12) ,2:PRINT:PSET(216, 
142) ,1 

4390 FOR I-1 TO 8 

4400 READ X,Y 

4410 LINE-(X,Y) , 1: NEXT 

4420 IF INKEY$-" " THEN RETURN 
4450 PAINT(220,160) ,2, 1: PAINT(24 
5,160) ,2,1 

4440 LINE(2 さ 4 。164) - (234,12) ,21PR 
INT:PRINT 

4450 X-2:Y-24:M$-"BY NUKUI HIDEY 
UKI":GOSUB 6189 

4460 X-5:Y-28:M$-"NUKUI TOSHIYUK 
I":GOSUB 6180 

4470 X210:Y-30:M$-"HIT SPACE KEY 
":GOSUB 6180:S0UND 8,0:21-0 

4480 71=71+1 

4490 GOSUB 849:2-0 

4500 Х=7: Ү=5:№1+Ғ: 50508 6750 
4510 Х=12: Ү=5: №20+Е: 505086750 
4520 X=18:Y=4: N=3+F: GOSUE 6750 
4530 X=23: Y=9: N=23+F: 5605086750 
4540 X=29:Y=7: N=25+F: 50508750 
4550 7-7%1:Х-<10:Ү-20:М%-"НІТ SPA 
СЕ KEY":GOSUB 6180 

4560 IF INKEY$-" " THEN RETURN 
4570 Y-30:FOR Х=1@ TO 22 STEP 2 
4580 GOSUB 6810:МЕХТ 

4590 IF Z«4 THEN 4550 

4600 IF 71<15 THEN 4480 

4610 DATA 5,127,7,120,11,116,19, 
116,19,142,26,142,26,116,55,116 
4620 DATA 58,120,40,127,40,187,2 
6,187,26,162,19,162,19,187,5,187 
4650 DATA 65,142,70,144,70,154,6 
0,154,60,142 

4640 DATA 100,1:29,110,129,110,14 
8,120,150,120,162,110,159 

4650 DATA 110,172,118,172,111,18 
2,105,182,100,181,100,156,110,16 
の 


4660 DATA 96,154,95,142,110,148, 
130,116,148,156,166,116,166,186 
4570 DATA 150,185,174,186,190,14 
2,201,186,194,185,189,158 

4580 DATA 252,186,252,142,242,14 
2,242,164,226,164,226,186,216,18 

6 

4590 DATA 216,142 

4700 REM жжжкжж DEMO PLAY 3x 
4710 GOSUB 2870:GOSUB 2900: GOSUB 
2950 

4720 GOSUB 6370:DEMO-1:Y-Q 

4730 FOR X224 TO 20 STEP 2:GOSUB 
6810: NEXT 

4740 X225:Y-0:M$-"DEMO":GOSUB 61 


4750 GOSUB 840:FOR I-1 TO 3 

4760 X=TX(I):Y=TY(I) 

4770 UG=U1 (1) :M=M1 (1) 

4780 ON F1 GOSUB 710,1400:REM FF 


4790 U1(I)-UG: M1 (І) =М: ТХ (І) X: TY 
(I)=Y: NEXT 

4800 X=MX: Y=MY: IF U2»-0 THEN 483 
@ 

4810 MH=INT (RND (1) #4) +1 


どこ か に JR ジリ ー ズ の パソ コン クラ グ は … と 探し て いま し た だ が, 目 に ょ 
まっ だ の が 初め て 買っ だ PiO に 載っ て いた 迎 夢 快 信 ほん の JUFC. ぜひ と も 入会 し た い の で す が , 方 法 が わか り ま せん . 誰か 教え て くだ さい . 
で きれ ば , 次 の 住所 に 入会 方 法 と 活動 内 容 を 書い た 葉書 を 送っ て くれ ませ ん か :. 〒660 兵庫 県 尼崎 市 神田 北 通 8-206 山下 太郎 まで . PS ` 

РІО > て 面白 いで すね . これ か ら も 買い 続け た いと 思い ます . 


4820 U2-INT (RND (1) #7) +1 

4830 GOSUB 6810 

4840 U2-U2-1:STzMH*2-1:GOSUB 540 

s MX= ニ Xs MY=Y 

4850 FOR 1=1 TO LS 

4860 IF TF(I)=Ø THEN CzST: GOSUB 

430 

4870 IF TF(I)-1 THEN GOSUE 880 

4880 NEXT 

4890 IF TI«G AND GU= の AND бЕ=@ A 

ND G2-0 THEN GOSUE 990 

4900 IF GF-1 THEN GOSUB 990 

4910 IF GU-1 THEN X=15: Y=15: N=47 
:GOSUB 6750 

4920 IF F=1 THEN GOSUB 660 

4950 GOSUB 1750 

4940 GOSUB 1470:IF Nk=2 THEN DEM 

О-0: GOTO 5000 

4950 X=11:Y=1 3: M$=" DEMO PLAY":GO 

SUB 6180 

4960 Х=9:Ү=17: МФ="НІТ SPACE KEY" 

:GOSUB 6180 

4970 IF INKEY$-" " THEN рЕМО=0: К 

ETURN 

4980 GOTO 4750 

4990 REM жжежж SCORE TABLE A 

5000 COLOR 2:CLS 

5010 FRINT TAB(18)"SCORE TABLE": 

GOTO S040 

5020 SOUND 7,40: SOUND 9, 16: SOUND 
6,0: SOUND 3,0: SOUND 2,100: SOUND 
12,5 š 

5050 SOUND 11,2595: SOUND 15,0:КЕТ 

URN 

5040 SO-1:GOSUB 5020 

5050 X-2:Yz10:N-20:GOSUB 6750 

S060 LOCATE 2,5:PRINT "a." 

5070 Х=8: Ү=10: M$-"GIANGS 50 

FOINTS":GOSUB 6180 

5080 GOSUB 5020:Х-2:Ү-14:М-25:060 

SUB 6750 

5090 LOCATE 2,7:PRINT "=." 

5100 X=8: Y=14: МФ= "РКАМ<ЕМ в@ 

FOINTS":GOSUB 180 . 

5110 GOSUB 5020: Х=2: Y=18: №22: ВО 

SUB 6750 

5120 LOCATE 2,9:PRINT "=s" 

5150 X=8: Y=18: M$= "GALDENZIN": GOS 

UE 6180 Ў 

5140 X=19: Y=22: МФ="500 POINTS": 

GOSUB 6180 

5150 X-13:Y-24:M$-"O К 
INTS":GOSUB 6180 

5160 LOCATE 9,12:PRINT "( p" 

5170 CONSOLE 3,13:LOCATE 0,15:РК 
INT: CONSOLE 1,15 

5180 SOUND 0,15: SOUND 1,4: SOUND 

8,16: SOUND 7,56: SOUND 12,3: SOUND 
15,12 

5190 Х-10:Ү-28:М%-"НІТ SPACE KEY 
"*GOSUB 6180:I-0 

5200 I-I-*1:1IF INKEY$-" " THEN RE 
TURN 

5210 IF I<500@ THEN 5200 

$5220 REM жжжжж GAME セリ メイ 3**** 
5250 CLS 

5240 LOCATE 3,2 

5250 PRINT "GAME セリ メイ リ 

5260 X=2: Y=8: M$=" MOVE 5 
URSOR KEY":GOSUB 6180 

5270 Х=18: Ү=10: МФ= "ОК" : 6050В 618 
の 

25280 X=16: Y=12: M$="JOY STICK":GO 
SUB 6180 

5290 X-2:Yz16:M$-"FIRE 

SFACE KEY":GOSUB 6180 

S300 X-218:Yz218:M$-"OR":GOSUB 618 
の 

S310 X=16: Y220: M$-"TORYGER" : GOSU 
B 6180 

5520 Xz2:Yz24:N-1:GOSUB 6750 
5250 LOCATE 2,12:FRINT "...НІТМА 
М" - 

5540 Xz12:Yz226:M$-"THIS IS YOU": 
GOSUB 6180 

5:350 Iz0:Xz10:Y-30:M$-"HIT SPACE 
KEY":GOSUB 6180 


18- PO 


S360 I-I-*1:IF INKEY$-" " THEN RE 
TURN 

5570 IF 1<5000 THEN 5560 

5580 50-0 


5590 REM жжжжж HIGH SCORE жжжжж 
5400 CLS:EXEC&H1 の 58 


5410 LOCATE 2,2:PRINT "<< BEST 5 


ورن 


5420 FOR 11=1 TO 5 

5450 X-1:Y-6*I1*4 

5440 M$-STR$(I1):GOSUB 6180 

5450 SC-HS(I1):X-6: GOSUB 6290 
5460 МФ=МАФ (11) : Х=16: БОБОВ 6180 
5470 МЕХТ 

5480 X-10:Y-30:M$-"HIT SPACE KEY 
": GOSUB 6180 

5490 I-0 

5500 I=I+1:A$=INKEY$: IF І>8000 Т 
HEN 4090 

5510 IF INKEY$-" "THEN RETURN 
5520 GOTO 5500 

5550 REM «x BOUNS ROUND **** 
5540 CONSOLE 0,16:С15 

5550 LOCATE 4,6:PRINT "ROUND" ; ME 
: ME=ME+ 1 

5560 LOCATE 2,8:COLOR 4:PRINT "B 

OUNS ROUND" 

5570 PLAY "V1OT200L8SCGECDAFDBi1", 
"V10T200L 8BOSCGECDAFDB1 " 

5580 EXEC&H25bES5:GO0SUB 6570 

5590 FOR I-1 TO 10:ВІ (І) =0:Сі (І) 
=@ 

5600 BX (І) =INT (RND (1) #27) +2 

5610 BY (І) =INT (RND (1) #27) +2 

5620 IF X=BX (І) AND Y=BY (I1) THEN 
5600 

9630 BN(1) ZINT (RND (1) #4) +15 

5640 X=BX (1I) : Y=BY (1I) : NSBN(CI) : GOS 

UB 6750 

5650 X=BX (1I) :Y=BY (I) :NEXT: GOSUB 
2930 

5660 ВІ (INT (RND (1) +10) +1) =2 

5670 B=INT (RND (1) #10) +1: C20: B1=1 
: RS=@ 

5680 IF BI(B)=@ THEN ВІ (В) =1: БОТ 
О 5710 

5590 GOTO 5670 

5700 REM s«*x BONUS MAIN a 
5710 GOSUB 840 

5720 GOSUB 660 

5730 БОБОВ 510:1-0 

5740 I-I-*1 

5750 IF ВХ(І) =МХ AND BY(I)=MY АМ 
D CL (1)=0 THEN 5810 

5760 IF Е1=2 THEN 5890 

5770 Х=ВХ (І) : Y=BY (1I) : N=BN( 1 ) s GOS 
UB 6750 

5780 IF 1<1@ THEN 5740 

5790 GOTO 5719 

5800 REM жж BONUS リン タリ жи 
5810 CL (I)=1:BN(I)=47 

5820 IF BI(I)=1 THEN 5880 

5830 IF ВІ(І)-2 THEN BN(I)=22: PL 
АҮ "L6AV1OTOCEGEC":B1-2 

5840 PLAY "50М500002С" , "50М50000 
4С", "50м500006С" 

5850 C=C+1:SC=SC+C*B1:BS=BS+C*B1 
: X=6: Y=0: GBDSUB 6290 

5860 GOTO 5780 

589870 REM жээ 2.7" x*****3*** 
5880 Х-ВХ(1):Ү-ВҮ(І):М-25:605МВ 
6750 

5890 PLAY "V1O0D6L16GRi16GRi16GRi16E 
-2","V100L165GRi16GRi6GRi16E-2" 
5900 FOR 2-0 TO 10000:NEXT 

5910 N-26:GOSUBR 6750 

5920 FOR J=@0 TO 5000:МЕХТ 

S930 REM sss BONUS хы 


5940 CONSOLE1:CLS:X-10: Y-8:N-47: 


GOSUB 6750:LOCATE 7,4:PRINT "="; 
E 
5950 PLAY "OL6480MSOOOTCDEDGFEDC 


4.","O03L64S0MSODOTCDEFGFEDCA. " 
5900 FLAY "DEFGAGFED4. ","DEFGAGF 
Ер4." 

5970 PLAY "GGGGGGGGBA4.","GGGGGG6 
GB4." 


5980 FLAY "GBAGFEEDCA4.","GBAGFEE 
DC4." 


5990 PRINT:PRINT" ТІМЕ =" ョ TI 


000 BS-BS«*TI/2:LOCATE 2,8:PRINT 
"BONUS";BS*10 

010 FOR I-BS TO 1 STEP -1 

6020 SC-SC*1:X26:Y-0: GOSUB 6290 

6050 NEXT 


リス ト 3 HIT MAN ソー ス ・ リ スト 
6040 IF С= >79 THEN 6090 
6050 LOCATE 2,10:FRINT "SPTIAL В 
ONUS" 


6060 LOCATE 6,12:PRINT "1000" 
6070 FOR I-100 TO 1 STEF -1 


.60080 SC-SC*1:GOSUB 6290: NEXT 


6090 EXEC&H2SES: RETURN 

6110 REM жжжжж to" Езоу” xx* 
6120 N-ASC(A$)-64:IF А%>="@" AND 
A$z-"9" THEN GOSUB 6240: RETURN 
6130 Lz1:AD-FNA(C1):D1-&HDEBS-*N*1 
2 


ы 


6140 FOR J=AD TO AD+352 5ТЕРЗ2 
6150 POKE J,PEEK(D1-*L)s:L-L-*1 
6160 NEXT: RETURN 

6170 REM ww** fz" LY Баб“ жы 
6180 FOR 1=1 TO LEN(M$) 

6190 A$-MID$(M$,1,10:IF A$-" "TH 
EN Х-Хғ1:650Т0 6220 

6200 GOSUB &12@:Х=Х+1 

6210 IF S0-1 THEN PLAY "V1007F64 
"FOR 11=0 TO 800:NEXT 

6220 NEXT: RETURN 

6250 REM **«* ZIL” Баб" x«xx* 
6240 AD-FNA(C1):D1-&HDE47-12*VAL ( 
A$):L71 

6250 FOR J=AD TO Ар+552 STEP 32 
6260 FOKE J,PEEK((D1*L):L-L-*1:NEX 
T 

6270 RETURN 

6280 REM жжжж SCORE Бат" жж 
6290 SC$-RIGHT$(("OOO0O0"«-RIGHT$(ST 


R$ (SC) ,LEN(STR$ (SC) ) =1) +"0", 6) 


&®@@ AD=FNA (1) 

6510 FOR B ウ =6 TO 1 STEP -1 

6520 S1-VAL(MID$(SC$,60,1)):D1-X& 
HDE47412*S51 

6550 L-1:FOR J=AD TO AD*352 STEP 


6340 FOKE J-*G0-1,PEEK(D1*L):L-L-* 


6550 NEXT: NEXT: RETURN 

6560 КЕМ ««* MAKE SCREEN жжжж 
6570 CLS 

6580 X=Q:FOR Y=2 TO 29 STEP З 
6590 N=INT (RND (1) #5) +15 

6400 IF М=М2 THEN 6390 

6410 GOSUB 67950: N2-N: NEXT 

6420 Х-50:ҒОК Y=2 TO 29 STEP 3 
6450 N=INT (RND (1) #5) +15 

6440 IF N=N2 THEN 6450 

6450 GOSUB 6750: N2-N: NEXT 

6460 М%= "БСОКЕ": Х=0: Y=0 

6470 GOSUB 6180 

6480 X-6:GO0SUB 6290 

6490 M$="HIGH": X=13 

6500 GOSUB 6180 

6510 Х=18: B-SC: SC-HS (1) 

6520 БОБОВ 6290:SC-B 

6550 IF МК=@ THEN6570 の 

6540 FOR X224 TO 24-*NK*2-2 STEP 


6550 N=1: GOSUE 6750 

6560 NEXT 

6570 LINE(50,184) - (200,192) , 4, BF 
6580 LINE(S0*6,184)—(50*G,192) ,2 
6590 N-13: Х=2: Ү=50: GOSUB 6750 
6600 N-14:X-4:GO0SUB 6750 

6610 RETURN 

6620 REM жжж リリ イレ リ T4T*T" жж 

6630 OUT&H935,2:CLS 

6640 DIM ТХ (5) 。TY(5) ,U1 (3) 。M1 (5) 
ぅ >1H(5) ,N1 (5) 。HS (5) ,NA$ (5) 

6650 DIM TF(2),J0X(3) ,JY (32 。H(4) , 
GX(8) 。BY(B) , TJ (5) , T8(5) ,DX (5) ,DY 
(5) 

6660 DIM AT(S) ,H1 (5) 。BX(1 の ) 。BY(1 

Q) ,ENC1OD ,BI (10) ,CL (10) : RETURN 
6740 REM *** WRITE CHR +++ 

6750 LzQ:AD-FNA(C1):D1-£&HD9EO-*N*2 
4-24 

6760 FOR D=QD TO AD-*£&H20*11 STEF 
&H20 

6770 РОКЕ D,PEEK(D1-*L):L-L-*1 
60780 POKE D*1,PEEK(D1-*L)s:L-L-*1 

6790 NEXT: RETURN 

6800 REM sx CHR ケズ ххх 

6810 AD=FNA (1) :D1=%x*HAñ 

6820 FOR D=AD TO AD-&H20*11 STEP 
&H20U 

6830 POKE р,рі: РОКЕр+1,рі1 

5840 NEXT:RETURN . 


a ا‎ 
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時 は 西 歴 2100 年 , A XR A8 &7- А п 
を 移住 させ る た め , 宇宙 へ 進出 し 始め た . 
と ころ が アン ドロ メダ 星系 で R 星 の 移民 団 
と 衝突 , 第 1 次 宇宙 戦争 が 勤 発し た . 

物資 の な い 地 球 軍 は 苦戦 を 強い られ て い 
る が , た だ ー つ の 切り 札 , コパ ー マ イ ン 号 
で R 星 へ 攻撃 を か けれ ば , 道 が 開け る 可能 
性 は ある . 

あな た は R 星 へ 向かう コパ ペー マイ ン 号 の 
操縦 席 に 座っ て いた . 前 方 に 光 点 が . ノ 
「 も う 来 や が っ た の か …」 

瑞 は 波状 攻撃 を 仕掛 け て くる . あな た は 
トリ ガー を 引い た …. 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


N60-BASIC 
マシ ン 語 D0A0--DEFF 


КЕШ 
| つつ つつ 
|] 初め は オー ソ ド ッ クス な シュ ー テ ィ 
。 | ング ・ ゲ ー ム と 思っ て いま し た が 
E | 敵 が 真 上 に 来 た と きだ け ミ サイ ル を 
| 撃つ と いう と ころ が 意外 に 面白 いで 
すね . (A) 


i4, 6001 を ペー ジ 2 で スタ ー ト さき せま 
す 。 そ し て BASIC の リス ト を 入力 し て セー 
し ます . 自分 自身 リス ト を 書き 換え る 
の で RUN す る 前 に モ セーブ し て くだ るい. 

次 に マシ ン 語 の リス ト を ?85 年 4 月 号 の P 
IO モニ タ な ど て で て で 入力 し , モー プ し ます 。 

BASIC の ブロ グラ ム を RUN する と 自動 
的 に マシ ン 語 の プロ グラ ム を ロー ド し て , 
5 面 か ら の X メ ファイ ター が な か な か 面白 い 


ӨСЕМЕ:О? SCORE:ODUSOOO LEFT:« 


SCENE : 093 


#1 アド レス ・ マ ッ プ 


作者 名 表示 

タイ トル 表示 

フラ グ ・ リ セッ ト 1 
フラ グ ・ リ セッ ト 2 
初期 設定 2 

初期 設定 1 

初期 設定 3 

コバ パー マイ ン 爆 発 
画面 アド レス 計算 
16х8 ドッ ト 表示 

8 X8 ド ッ ト 表 示 

コバ パー マイン 移動 

コバ パーマ イ ン ミ サイ ル 発 生 
コバ パー マイ ン ミ サイ ル 上 上 昇 
コバ パー マイ ン ミ サイ ル 敵 に 当たる 
フル ー ツ に 当たっ た か ? 
MEE 

ベク トル 計算 

乱数 計算 

乱数 SET 

t 1 匹 移動 

敵 ミ サイ ル 発 生 

OUT SET(1) 

OUT SET(2) 

バ パターン SET 
келті) 

敵 ミ サイ ル 1 個 移動 
敵 ミ サイ ル 全 体 移 動 
ESU 

ERE 

数 字 1 字 表 示 

10 進 表示 5 桁 

10 進 表示 3 桁 
LEFT 表 示 

SCORE 表示 
SCORE 加 算 ( 敵 ) 
SCORE 加 算 ( フ ルー ツ ) 
デー タ 消去 
フル ー ツ 発生 
フル ー ツ 移動 

SCENE 表示 

上 部 メッ セー ジ 表 示 
英 爆発 
メイ ン ・ ル ー プ 

ウエ イト ・ ル ー プ 
バッ ク 音 ルー チン 

タイ マー 割り 込み SET 
SCENERE SX SET 
5СЕМЕШЖЖ5<ЕТ 
SCENE ス ピー ド SET 
SCENE フ ルー ツ SET 
SCENE 敵 キャ ラク タ SET 
SCENE 得 点 SET 
SCENE 進 め る 


SCORE :001600 LEFT < 


作者 名 グラ フィ ッ ク ・ パ ター ン 
タイ トル ・ デ ー タ 

バッ クサ ウン ド ・ デ ー タ 

上 部 メッ セー ジ ・ デ ー タ 
フル ー ツ ・ デ ー タ 
移動 パタ ー ン ・ テ ー プ ブル 

mü 1 パターン 

敵 2 パターン 

MM 3 パタ ー ン 

敵 4 パタ ー ン 

コバ パー マイ ン パ ター ン 

敵 ミ サイ ル パ バタ ー ン 

コバ パー マイ ン ・ ミ サイ ル パ タ ー ン 
空白 

ベク トル ・ デ ー タ 
爆発 バタ ー ン 16x 8 
数 字 パ ター ン 
爆発 パタ ー ン 8 х 8 
フル ー ツ 爆発 音 


コバ パー マイ ン X 座 標 

コバ パー マイ ン ミ サイ ル ・ フ ラグ 
コバ パーマ イ ン ミ サイ ル ・ 座 標 
敵 の 数 

リタ ー ン フラ グ 
殺し た 敵 の 数 

フル ー ツ フラ グ , JA 
フル ー ツ X 

敵 移動 テー プル ・ ア ドレ ス 
英 キ ャ ラク タ ・ ア ドレ ス 
スコ ア 表 示 用 カー ソル X 
スコ ア 

ЖТ х 

フル ー ツ ・ ポ イン ト 

LEFT 

SCENE 

フル ー ツ ・ カ ウン タ 

フル ー ツ ・ キ ャ ラク タ 
WAIT ルー プ 数 

割り 込み フラ グ 
割り 込み カウ ンタ 1 
割り 込み カウ ンタ 2 

サウ ンド テー ブル ・ ア ドレ ス 
敵 キ ャ ラク タ 計 算 エ リア 
i727, 座標 

敵 フ ラグ 

敵 ミ サイ ルフ ラグ 

瑞 座 標 X,Y 

敵 ミ サイ ル 座 標 Y.X 


なぜ PiO は 定価 を 上 げ ず に ン ソノシート を 付け る こと が で きた か , わか る 人 は いる か な ? 私 は こう 思い ます . 1, 2 月 号 の 場合 。 表紙 の ユー 
ティ ング を な くし て その あま っ た 分 を ソノ シー ト に 回 し た の で し ょ う . し か し 3 月 号 は 2 枚 も 付い て いる . な ぜ か . 私 は その 答え を 見 つけ ま 
LE. それ は な ん と 紙 の 質 な の で す . 3 月 号 の 色付き ペー ジ と 自 の 普通 の ペー ジ , そし て 1, 2 月 号 の 和 貼 の ペー ジ を 触っ て みて くだ さい . ほ 一 
o. 3 月 な の 白 ペ マージ の 表面 は ゴワ ゴワ し て いる で し ょ . 多分 これ は ちり 紙 交 換 な ど で お な じみ の 再生 紙 で し ょ う . フッ フッ フッ どー が だ 編集 


Дө, 
タイ トル が 表示 され ます . 敵 の ミサ イル や 敵 に 当たる と LEEFT が 1 まだ た 1, 2 面 で は , な か な か 敵 が 出 て こ 
つっ 減っ て し まい ます . LEET が な く な る と な いこ と が あり ます が 。 バッ ク の 星 を 「 ア 
ゲー ム ・ オ ー バ ー に な る の で 当 だ ら な いよ ステ ロイ ド だ /」 と 遊び な が ら 待 っ て くだ 
242. 8v. 
ーー - 1 面 中 一 定数 の 敵 を や っ つけ る と 面 ク リ 
タイ トル の 表示 後 , | spPACE| キー を 押す ア に な り ま す . ір, 4 面 ク リア する ご と 
と ゲー ムー スタ ダート で すず. に 1 機 LEFT が 増え を ます . し か し あま り 増 
ュ パ ー マ イ ン は , カ ー ソ ル て で 左右 に 動き , や す ょ と スコ ア の 表示 が 変 に な る の て 気 を 付 
[SPACE] X キー で ミサ イル の 発射 で す . け て くだ さい . で も ゲー ム に は 支障 は あり BASIC と マシ ン 語 か ら で き て いて , BA 
敵 は 4 種類 いて , 動き ,BGM が それ ぞ れ ませ ん . SIC で は マシ ン 語 の ロー ド や 面 ク リア , ゲー 
違い ます が , 攻撃 の 仕方 は 同じ で す . 敵 は ム ・ オ ー バ ー の 処理 な ど を 行なっ て いま す . 
ュ コバ パーマ イン 号 の 真 上 へ 来る と ミサ イル を 英 の 動き は 全部 パタ ー ン を テー ブル に し 
2 発 ず つ 発射 し ます . C, デー タ を テー ブル か ら 順 番 に 取り 出 
偶数 面 は 1 面 に 4 回 フル ー ツ 型 エ ネル ギ し て は 動か し て いま す . バッ ク の 音 も タイ 
ー 補 給 装 置 が 最上 段 に 左 か ら 右 へ 流れ ます . 初め の パタ ー ン は 簡単 な の で , さっ る と マー 割り 込み を 使っ て , デー タ ・ テ ー プ ブ 
高 得点 で す の で よく 狙っ て 撃っ て くだ る さい. クリ ザ ア し で し また いま し ょ う 。 ЖҮР >же-У ルケ から 1 つ ず つつ 取り出し な が ら 音 を 出し て 
9 面 か ら の 敵 は ちょ っ と 手強い も あま り 得 点 に な り ま せん か ら . いま す . 他 に 特別 な こと は し て ませ ん . 
SCEME:10 SCORE:011500 LEFT.:« 次 から の パタ ー ン は まとも に 狙っ て し ま 
5t, スピ ー ド も 上 が っ て いる し , ЖОЖ 
も 多い の で 、 す で 補 られ で て し まう で も まう 。 
敵 が 固まっ て くる と , ミサ イル も 固まり に 
な っ て 降っ て きま す . Ы am, WM EU 
を ん な 場合 , 移動 の キー を 押し っ ぱな し ー ク ・ エ リア を 書い て お きま す 。 いろ いろ 
(= Ll Dî G [SPACE] キー を 適当 に 押す と 敵 | いじ っ て みて くだ さい . それ が か がら, フル ー 
が 目 の 前 に いな い 限 り 切 り 抜 けら れ ま す . ツ の キャ ラク タ は , PiO パ マー ツ を 手直し し て 
し か し 長 時 間 使う と 悲惨 な こと に な る か も 使い まし た 。 
し れ な い の て で て 気 を 付け て くだ さい . 


4 


I リ スト 1 コパ ペパー マイ ン BASIC リ スト # 
о=РЕЕЕ (YHD OE) +FFEEE (HDF OF ) ж 


о GOSUE1000 
10 SCREEN4,2,2: COLOR1, е, 1: CONSUL. 
Ед, 16。 の 。 の 9 じ し ら 

15 CLEARSO,ZHDo9F 

20 НІ=@ 

59 EXEC£&EHD280:EXEC&HD124A9oO 

4o (01 

50 COLORC:LOCATES,1S5: РКІМТ "FUSH 
SPACE KEY !''"si:C-1-C 

69 IFSTRIG(GO) zeTHENSe 

76 FLAaY"OASeOMSeoooCcaR1I6C4.EgCSES 
G4." Ç 

ба エド ドド に EE に ET て HF D1BE) EEOTHENSBG 

96 CLS: COLOR1: EXEC&HDZ 96: EXECSHD 
AZO0:2EXECRHDXAG 

91 FLAY"Có64"," "C54" 

972 SOUNDA, 26: SOUND11, S: SOUND12,6 
: SOUND? , 28: SOUND16, 16 

192 EXEC&HD9O00:FORKER&HDF 19,0: SOUN 
р9,0 

112 ІЕРЕЕК (ӘНрЕОВ) -іТНЕМдӘӘО 

200 EXEC£&HD3EO:IOKERHDF 14,FEERE CR 
HDF14)-1:EXECZ£ZHD?CG 

216 LOCATE12,98: FRINT" EOWAAAN ! " 
220 ІЕРЕЕК (НрЕ 14) чӨТНЕМЗ5ОО 

зто l"LAv"O4seWnmieoooeócaRSCACaE1ó6R1 
осе" 

240 FORKzeTO1e000:NEXT 

256 Сі6:ЕХЕСЕИНрЗАВ: GOTO? 1 

300 SOUNDS,12:FORJ-z3TOS:FORI-eOTO 
25585TEF8: SOUNDe, I: SOUNDI, J: NEXT: 
NEXT 

216 SOUNDS, © 

529 LINE (96,96) 一 (167。 108) , O, BF 
330 LOCATE12,8:PRINT"GAME OVER" 


540 
256 
SIO LOCATES,11:PRINT"HIGH SCORE: 
"HIS "ОО" 
560 LOCATES,1606: FRINT"YOUR SCORE: 
"Goo" 
47€ IFHIZSTHENHI-zS:LOCATEÓO,13:FR 
INT"YOUR SCORE IS BEST !!" 
380 (0:1 
382 COLORC:LOCATES,1S5: FRINT"'"PUSH 
SPACE KEY !'!"$:021-C 
554 IFSTRIGOO)zeTHENZGZ 
i96 COLOR1: GOTOSG 
даз FLAY"SaMnSeaegacaRSESRSLSDCDE 
G4" 
4102 ТЕРЕЕК CHFD1E) = 2OGTHENA 1o 
426 CLS:LOCATEO,135 
430 РКІМТ" FE FE FF FE FF H FF FF H FF FF FF 1F HHHH 
HF FE FE FFF 
451 РКІМТ" ## 
HH 
452 РКІМТ" HH SCENE 
нн”; 
‚ LOCATE18, 15: FRINTFEEK (HDF 15S 


460 EXEC&HDZ7O0:EXEC&HDZAS8:GOTO 9 
1 

479 FORIsOTOA:FORJsGTOZG: NEXT: FF 
INT:NEXT 

490 REM 

491 PRINT" キキ キキ キナ キキ キキ キキ ナナ キキ 
++ + 

+ 
492 PRINT" + * BONUS ж 

+ + 1f "л 

+ 

494 PRINT" % 

+ トキ トキ キキ トキ キナ トト キキ キキ 
++ 

see FUEE&HDF14。FEEE (HDF14)+1 
51e 6070450 

1000 FORIs£HFS78TO&HFS8Di:READAS: 
РОКЕТ, VAL ("&H"+A$) : NEXT 

1010 EXECEHFG878 

1920 POKEPEEE ((XHFA60) *25645, 142 
1950 RETURN 

2000 DATA 00,00, 00, оо, Ср, 94, 25,0 
56,05, CD, 76, 1A, FE, AF, 20, F7 

2010 DATA 10,F7,21,32,F8,06,06,C 
D,70,15,77, 22, 16,F9, CD, G6 

сәсе рата 18, АЕ, 22, 58,Е8,21,76,2 
S. CD, СЕ, 20,21, 26,F8, CD, CF 

2030 рата 30,CD, 9A, 25, 2A, 32,F8,E 
D, 4B, 24,F8, 1E, 00, CD, 76, 14 

2040 DATA 57,82,5F,72,22,0B,78,B 
1 20,F2,CD, 76, 1A, BB, CA, AA 

2056 рата 1A,CD, AA, 1A,21,85,03,C 
3, CF, 30 


434 FRINT" ## CLEAR ! 
## 
435 PRINT" ## 
HH 
456 FRINT" ННН H E FE HE HE HF НЕНЕН 
HH HEH HH 
446 IF (FEEE GHDFE 15) ANDI) =@THEN47 
e 
45% FORI-OTO15:P"RINT:FORJ-zeTOZeG: 
NEXT: NEXT қ 
| リス ト グ の コパ ペー マイ ン マシ ン 語 リス ト 
DoFG:1F ЕЕ.О7 El ЕВ 7E FC 97:7Е D128:F8 QF СӨ 7E 29 26:ОВБ 
ЮоЕВ:ЕВ 7E FC ӨЕ ЕО FE 49 25:CD Dize:aox 8 7E FC 7:54 
Dieeo:or FC à7 El FB 7F FB 67:69 D1Z8:F8 7E ЭЕ ЕО FE 24 92:15 
D16G8:FB 7F FB ӨЕ СО 7E 64 93:B3 D14060: 05 'e 7E 7: CA 
Diieo:o7 F8 07 El ЕВ 7F Fe 07:55 D148:F8 ое a F 4C:35 


рл: FF 3 
DORB FC 
DOB: FF ЖЕ 
DORS: FC 
ресе: ZE 


pec8:F8 
DeDei 7E 
DƏD8:F8 7 
DeEe: ЗЕ 3 
DOEB:FG 


р118:ҒВ 7F FO OF LO 7E 92 49": 4F DISS: O3 oS FS.FO 7E Q7:9D 
t quem چو ت‎ iom igi ni ey qnm pt ج د‎ t ttti теат D158:F8 7E SF 07 | М 28: DA 
Sum: 56 El 96 6B 76 BE 3D 4F:18 D160:05 РЕ ZsF ア 

D168:FB 7E 3. FF 9: A3 
DI 20:03 ҒӨ 07 Et F8 7F ЕВ 97:51 D170:07 Е C6 CF:CB 


A. 図星 どろ う . PS も し これ が PiOPiO に 載ら な か っ た だ たら , 編集 部 は この こと を 隠し て いる こと に な る ん だ よ ょ よ . ほ ー ら , ほ ー ら ,、 載 せる , 
載せ る , 載せ だ く な っ て さて せる, 
(は ば か り ) 


97 


241%, 


リス ト 2 コバ ー マ イ ン マシ ン 語 リス ト 


D178tFC 
Dig3o:o7 
D188:FC 
0190:00 ос ee: oo 
D198:00 00 бб өс оо OO: OO 


Sums ED 


60: 4D 
CF:4B 
8o: B9 


ріаё: 21. 

DIAG: CS ES 
DIBO: 23 
D1B8: 99 
Di1Ce:eoE 
D1CB8:F9 
DIDE: 99 
D1D8: 65 
DIEG: QD 
D1E8: OE 
DiFe:eoE 
DIFE: 01 
D200:12 ӨЗ 
D208: OC 
D2160:09 
ФЕ 


аб: 40 
O0: BF 
20: SE 
eoo: C2 
dA: 39 
OF: 55 
ФЕ: 4E 
OE: SF 
4: ӘС 
1B: 43 


D240: 09 


D248:02 ӨС 22 08:46 
р25Ө:ӨЗ 15 OB 11 06 95 15 05:57 
; ona 


19: 4F 
12:62 
og: DO 
оо: 4F 
O: Ob 


р258:01 ӘС ӨЗ 
р260: ӨЗ 
D268:01 ӨЗ 
D2760:09 
278591 
р280:21 の 9 
D288:17 56 oo 
0290: А@ 


DEA: D1 
D2^8: 00 
р2В0:85 F3 
D2B8: 00 
D2Có0: CD 


D2C8:600 96 14 43 77 
020@:10 ҒА C9 00 00 o6 ЕЗ CD:85 


o0: C7 
77:С4 
С9:55 
09:23 


ЗЕ OE? らら 


D2D8: 60 
DEES: 1A2 
D2bE8: 1: 
DEF: дд 
D2F8: дА 
0208: ӘБ 
D316z:oF 
DS18: OB 


— م سا میت‎ somme эсе semte asese ممست‎ ammes سمت‎ чш smete ーー ーーー sorse مم‎ sense ーー ーー ーーーー ーーーー ーー س‎ Sanom чеш ست‎ + 


9D 


Sum: 


о4:2С 
ÖÖ: OB 
O77 1C 
OF: 5С 
07:28 
O ЕЕ: 8 
QD: 41 
07:64 


O3: 13 


D320: 07 07 әб әб аб оз 
0559:05 өс 072 02 01 の は 
DIO: OO 
02:28:08 
DIA: 00 
DAO: OO 05 бө Ө OO 01 
р550:01 оз 
D358:0F 
DIO: OS o2 o1 


ex 


D568:FF ӨӨ оо до OO OO OO OO:FF 
р57ә:Ср ре DA 52 9% 52:6Ғ 


0578: 16 


DIAG: 10 
DIAS: CD 
D3BoO:14 


D3B8:14 21 49 
р5СӨ:ҒЕ ӨЗ 28 
D3C8:00 19 19 
D3DGs DF AF 32 
3D8: 3C 66 FB 
DiEÓ: ЖА ӨӨ DF 
DSEBiDE CD 160 
ОЗКӨ: ЗЕ OA DS 
D3F8:AàF DE Al 
D400: 4C әб ЕЗ 
D408: 29 29 29 
D410:E5 CD Go 
D418:1F ӘӘ 1А 


Sum: 9C ӨБ 495 
D420:13 99 Cl 
D428:FS5 05 ES 
D430:C5 01 20 
D438:C1 10 FS 
D44O0:CD 61 10 
D448:28 05 FE 
D4560: 00 DF FE 
D458: 35 об DF 
D460: F5 ЗА дө 
D468:60 DE CD 
D4760:DF 67 2E 
D478:16 D4 C9 
D43899: CD 61 10 
D488:DF FE ӨӨ 
D490: G4.3 DF СЕ 
D498:02 DF 11 


DF 43 
oz 56 o0 


о? бб 7E:Eñ 
25 56: BA 


Po SE 01 52 19:86 


O5 DF C9 oo OO: 6D 
FD FF FF 7E うじ: るみ 
7 2E 14 11 80:55 
D4 ЗЕ OC Di Аё: 4С 
Al E ep 05 А: 7А 


52 19 DF C9 00:16 


26 00 29 29 29:05 
29 27 09 C9 00:9Ғ 
D4 әб o8 CS G@1: 5A 
77: ҰЗ 1А 77:77 


eu 
45-2 


75 FE 28 SF 9E:84 
10 F1 ЕІ. АҒ U9:37 
CD GO D4 06 @8:5E 
oo ІА 77 13 09:93 
E1 Di Fr С? 00:52 
E6 36 CB FE 10:2 

гә 28 OA C9 ЗА: 89 
1E СВ 3C 18 08:1F 
FE ӨӨ C8 3D әд:іс 
DF 67 2E 14 11:C8 
16 D4 F1 32 99:12 
14 11 46 DE CD:84 
бб оо оо OO GO: AD 
Eé 86 C8 ЗА 61:07 
Сө А eo DF Z2:E8 
13 32 02 DF 24:70 
58 DE CD 28 04:Е1 


ーー ーー ーーーーーー e ーーーー — ーーーーーーーーーー … ーー ーー ーー ーー ーーーーーー 一 ーー ーー ーー 一 ーー ーー ーー seseo 


Sum: B2 А4 C9 
DAA: 3E 61 22 


D4AB: 3A 61 DF 
D4BO:DF 11 60 
DABSG:O02 DF 3D 
D4Ce6: 58 DE FE 
D4C8:28 D4 DD 
раро: рЕ 47 11 
D4D8:DD ZE оо 
DAEO:02 BD 260 
DAEG:28 бА IC 
D4F@:s1@ ЕЗ C9 
04Е8: 00 6E 02 
D560:77 аг DD 
D5608:77 60 11 
D516:CD EC 08 
D518:66 05 41 


F4 12 E9 Fi SB: 35A 
91 DF C9 бо 00:1A 
FE o0 СВ 2А O2:0C 
DE CD 28 04 30:31 
52.02 DF БЕ 11:B1 
91 CA 58 05 CD:D9 
21 406 DF ЗА 04:57 
ов өө 2A өз DF:4A 
А? 28 16 DD 7Е:95 
ол DD 7E ӨЗ БС: ӨЗ 
BC 28 66 DD 19:4E 
оо АҒ 32 O01 DF:7D 
DD 66 ӨЗ ES DD: S55 
77 063 SE ӨЗ DD: EE 
ве DE CD 16 D4:97 
ЗЕ Өр D3 Аё ЗЕ:8р 
CD обо D8 ЗА 66:59 


езе сз setet seeme sses مم‎ ке чен somm ーーーーーーーーーー ーー көзе мез جم‎ ーーーー ーー ーーーーーーーーーー шш ーーーーーー 


бит; 67 42 28 
520; DF うじ 32 


D3528:DF B8 20 
DS S6:DF Е1 11 
SAO: SA 07 DF 
D540:083 DF А7 
D548: D8 АҒ 32 
0550: ПЕ E6 GF 
D558: DD 21 40 
0560: ZE eo FE 
D568:10 FS C9 
D5760:DF Её 1E 
D578:DD 77 о2 
DS5860:00 29 29 
S388: SB Ө9 DF 
D596:74 оз DD 
D598:ED ЕВ ORB 


79 41 


ск 
mw 


Sum: 
DSA: DS &F 26 
D954a8:19' 5E 23 
DSBS: SA 28 FA 
рӚВЕ; ЗЕ СЗ 52 
D5Ce:22 DC FF 
DS5C8:DD 7E 02 
О5р 18 сә ос 
DSD8B:03 11 60 
DSEO:óE @4 DD 
DSE8:CAà 88 Dé 
05Е9: 74 ов CD 
DSF8:62 DD 66 
Dóoó0:67 7D 83 
0698:97 DD 74 


p PiO 3 月 号 p.57…PC-80001mkII と は 何で し ょ うか ? 
の 記事 を 較 せ て くれ る の で PiO は 大 好き で す . ク 
CULTURE” が 出 ま し た . Р.5.3 私 は 氷室 汗 子 きん と 新井 素子 さん の ファ ン で も 


P. 


o6 DF 47 
05 SE 01 
бо DE C3 19 04:66 
FE до 28 ФА ЗА: ВА 
28 94 BC СА 19:50 
o1 DF С9 әд 60:62 
Сә ЗА G4 DF 47:F8 
DF 11 O8 @9 DD: 1 ミ 
oo 28 ӨЗ DD 19:9Ғ 
ЗЕ 61 DD 77 99:61 
DD 77 ӨЗ ЗЕ 02:740 
DF Её 61 6F 26:В1 
27 29 29 29 ED: ES 
19 DD 75 94 DD:9F 
ФЕ o2 DD 66 0310C 
DF C3 16 DF 00: D9 


ЗА 94:Е? 
оғ; . 7772 


ai. ou ыш 


— ーー ーー ーー ーー ーー ーー ーー ーー ーー ーーーー ーーーー x 


BA 7А 


さら 97 59:68 
eo 29 11 702 DE:F2 
56 ЕВ рі C9 00:75 
47 ED SF 90 C9:48 
DB FF 21 BO D5:B3 
C9 оо осо оз GA: Cé 
FE 602 38 10 ҒЕ:АЗ 
DD óE O62 DD 66:E4 
DE CD 16 D4 DD:EO 
66 ӨЗ 7E FE FF:35 
25 DD 75 04 DD:7E 
Ав 05 EB DD 6EgF1 
оз 7C 82 Её ІҒ:АВ 
ЕФ 1F éF DD 75:2D 
Өз 7D FE 02 38: ОВ 


S1 THE ALAN 


П610:ӘС FE 18 59 o8 ED SE @B:AD 
D618:DF CD Dó D2 7D FE 14 20:03 


ーー ーーーー ーー ーー ーー ーー senas somme sosse ーー жәе ーー stemt coros posme o 


82 Е6 ñD 11 91 64 4D FE:66 


Sum: 


020515 са 
D628:3D EC 
Dóze:cc 78 
DZB: CA АҒ 
Dét: 4F Dó 
Dó48:D4 ZD 
DóSe:FE 062 
DéSE: G1 FE 
Dóóe:Ce DD 
Dé668:2C DD 
D67e:CD 28 
Dó78:DD さら 
D689sF5 ЗЕ 
D688:7D E6 
Dó9o6:DD 21 дә DF ЗА @4 DF 47:81 
D698:DD 7E ӨӨ FE @1 20 O5 С5:44 


Sum: СА АВ CB B7 ӨЗ 56 38 27:АЕ 


об DF 
CC 78 
рё Зр 
Dé 3A 
ЗА өз 
BC СА 
DB-FE 
o1 CB 
さら 01 
75 O06 
D4 Di 
eo oo 
の 2 32 


СӘ 6F 


BC CC 
ре ЗС 
ЗА 21 
Өз DF 
DF BC 
Fo D4 
18 ро 
SA eo 
o1 DD 
11 50 
24 C3 
DD 26 
oS DF 
C3 ES 


78 Dóà:o2 
3C ВС:47 
DF 47:18 
BD С2:89 
СА FO: B7 
20 7р:; 15 
DD 7E:19 
DF. BG: 9D 
74 07:2D 
DE 05:98 
28 D4:7D 
01 60:2 

F1 C9:05 
DS GO: OF 


11 
оо oO 
св ea 
11 60 
7D FE 
DD 77 
280 D4 
7D FE 
CA ТЕБ 
SG BC 
eji ос 
Xa 94 


ов 00 DD: 2 
оо әді DF 
DD 6E:16 
DE CD:6C 
18 СА:91 
の 6 11:95 
D1 25:02 
14 СӨ:Ғ9 
рь 5С6:2р 
CA 80:1E 
C9 00:7C 
DF 47:81 
өз oo:F2 
oo OO: CD 


DéAd: CD CB 
роА8:19 16 
реве: р) 7E 
Dó6B8:06 DD 
ресе: 16 D4 
D6C8:F2 рө 
DAD: 50 DE 
D6D8:CD 28 
DOE: ЗА oo 
06Е8: BC CA 
Dé6Foó:Dó C9 
D6F8:DD 21 
D7e6:CS5 CD 
D708: DD- 19 


Do L1 
ED.C9 
ül А? 
66 07 
2C 24 
ES 7D 
D5 CD 
D4 E1 
DF BC 
во рё 
DD 36 
46 DF 
BO Dé СІ 11 
10 F4 C9 oo 
р710:06 29 DD 21 26 DF C5 DD:C5 
D718:7E ӨӨ FE @@ 28 18 óF 69』8B 


42 18: BO 


до DA 
18 28 
eo DA 
DB C9 
D7 до 
1F DD 


р720:ЕЗ5 CD 
D728: 3C FE 
р750:ФЕ CD 
D738:C1 10 
D740: C3 3X6 
D748: DF E6 


CB A6 
er DD 
СЕ Еб 
DD i6 
eo eo 


21 20 


Er 7D 59 
77 OND 
DD 23:C1 
оо 00:88 
осо GOs DH 
DF 52:13 


р750Ө:57 07 32 SD 07 DD 7E 07:Ғ6 


р758:А7 ӨӨ 
D760:ES ӨР 
D768:90 DE 
0770167 2E 
0778: 52 Өр 
D780:DD 21 
D788:4E ӨӨ 
0790: 25 ЗЕ B7 ED 42 ЗФ: BS 
р798:ҒА 09 10 ЕБ: ВЕ 


ーー ーー ーーー seses ーーー バーー seme ーーーーーーーーーー مم‎ -.- ..- ーー ーーーー ーー ーー ーー somes кәне ーーーーーー ーー ーー ーー 


Co DD 
26 до 
o9 ЕВ 
оо CD 
DFEL 
А1 D7 


56 67 
29 29 
3A Өр 
28 D4 
c9 оо 
ов 24 


61 C9: 4E 
29 O1:F6 
DF F5:7D 
F1 3C: BB 
eo CGO: ca 
2-00 22 
оо DD: 4E 


eo oa 
АЕ C3 
58 e4 
CD 69 
ао оо 
11 60 
D4 C1 
FE eo 
65 CD 
C9 eo 


өс O1:23 
60 D7:AD 
ӨС 9O0:9HB 
D7 F1:74 
оо OO» CD 
DE 06:77 
24 10:87 
E1 CBs CC 
28 D4:44 
оо 90: Bé 


D7AG:C? ЕВ ёз 
р7АВ: 00 CD 
D7BO:01 @@ 
D7B8:18 F9 
D7CO:CD ёё 
D7C8:21 ӨӨ 
р7ро:о4 CS 
D7D8:F8 ЗА 
07Е@: 47 11 
D7E8:C1 24 


ӧ4 
60 07 
ФА BB 
FS 79 
D/ т. | 
1C Е5 
CD 28 
14 DF 
Ед DE 
16 F8 


07Е@: ЗЕ 10 32 Өр DF 2A ӨЕ DF:83 


D7F8:CD 80 
D8oo:24 ОЕ 
D808: 22 OE 


D7 ñF CD А9 
DF ED Sb 1e 
DF CD F6 D7 
рВ10:2А 62 DF 11 CD 28:D7 
D818:D4 2А OE DF 12 DF:24 


BA D3: oA 


17 UTES 
DF 19:57 
C9 の 69s6 ヒ 


ФЕ DF 
7E B7 
11 60 


D7 21:DD 
DE за: ва 
28 D4:F9 


р820%19 22 
D828:F6ó ПЕ 
085@:02 DF 


D838:AF 52 01 DF 52 068 DF С9:АЗ 
0840:21 60 DF 11 61 DF 01 FF:F1 
D848: 00 56 до ED BÖ C? @@ GO:9C 


すい ませ ん , こん な アラ 探し で 初 登場 し た く な か っ だ た ん で す が ….。 本 当 は ポケ コン 
PARSONS PROJECT を 聞き まし ょ う . 


P.S.2 新作 VULTURE 


あり ます 。. 


(実は Tomoko さ ん の ファ ン で も ある GREEN REQUIEM) 


gio 


リス ト 2 コパ ー マ イ ン マシ ン 語 リス ト 
DCD8:02 өз の 1 01 OO oO 01 09:97 
DCEO:Q07 оо OO O7 07 06 O7 FF:21 
DECES: 06G Оо оо oo OO оо оо OO: OO 
DCFóos:Qo оо со оо oO оо со OO OO 
DCFB OO OO оо оо OO оо оо OO: O0 
рроо:ов сов O5 O3 G2 ор ар O2:10 
DDeg:oz o5 46 06 O6 O6 95 ӨЗ:28 
рріб: ог ор o2 өр ӨЗ o5 об Gós:1C 
рр18:26 dé 05 ӨЗ O2 O2 O4 O4: 20 


27.25 IF 235 20 23 29 16%08 


DA98: 22 


— —— — osito «мне мө ماد ماج دجس‎ өрө (еее өөө) cosse еее емее cape eem е» soose e ee пере toes stb кеше өре) өзе» еее came «мы 


0G: S6 


р8509: ZA 97 DF FE бө СВ ЗА 98:28 
DB58:DF А7 СӨ DF E6 ЗЕ СО 26:44 
DB69s 16 DF ZC FE @5 CB 22 16:44 
DB58:DF ZE 01 32 68 DF C9 00:00 
D87e:zaà eg DF А7 СВ 67 2E 01:26 
D878:11 0 DE CD 28 D4 ЗА @8:5ñ 
раво: DF ЭС 32 08 DF FE 20 30:82 
D888:2?F 67 2E 01 ЕЗ ЗА 17 DF:DA 
DB8SO:6F 76 OO 29 29 29 11 CGsE1 
D8B98:DB 19 EB El CD 28 D4 ZAà:C32 


2 


Gum: 8C SC 61 67 ЕВ C7 20 51:ҒО 


pano: ЗА iE DF 21 СӨ DR АҒ 06:47 
DAÀA8:060 09 7E 32 10 DF ЗА 1E:00 
раво: рЕ 21 C4 DA 4F 06 99 G9:FC 
DAB8:7E 52 12 DF C9 бө бө MOA 
расә:сеі O2 OZ O5 O5 OA 14 28:56 
DAC8:22 ЖС 50 64 00 әд өө 00:22 
раре: за 15 DF 3C 32 15 DF С9:59 
DAD8:060 од 7E B7 CE ЕВ DB Әд:Б8 
рАаЕФ:@0 7C 7C FE Сё FE @@ o0: BA 
DAE8:00 @@ 7C 7C 7C FC FE ©09:6E 


биат 


DD2G0:04 O1 O1 O1 01 01 O1 01: ОБ. 
DD28:01 O1 91 o1 01 01 FF boros 


рвав: 01 DF А7 CB 3A ӨЗ DF FE:68 


DBABs の 1 CO ZA OS DF BC СА 19:72 DaFo:oo OO oo бб осо oo eo Co:Co рртошооә сос оо осо со оо OO OO OO 


DDz8:G0 бб оо OO оо оо OO OO: O0 
DDAe:o2 әз Өз O5 ов по G6 06:24 
рр48:05 O3 O2 өл G2 Өз ӨЗ ӨЗ:18 
рр5о:ов G6 ав о6 G5 өз өс Q2:24 
DD58:02 о? ӨЗ 95 06 06 O4 04:20 
рроо:04 07 07 07 97 97 07 97:55 
DDo8:07 97 07 97 97 97 FF 90:29 
рр7о:оә ос до оо OO оо OO OO OO 
рр78:00 оо оо OO оо OO OO OOOO 
ррво:ог2 от өр өз өл өз O2 O2:10 


ЮАЕВ: ЕЕ FE FF 00 00 00 GO QQ: FE 
pBoo:oo Có Có Ce E& Ce 18 00:0A 
рвов:оо оо Có Có Có Có Ce 18:F6 
DELIG: OO OO оо со OO OO оо CË: Ca 
оо: Бе 


тә: — esa s н» ーー еме көме өсе «гөө» өзе өзөн көме еме энөө ежен sosse кеге көме comno ーーーーーーーーーー 


D8BOÓ:DG сӯ оо оо оо оо оо OCAL 
DB8BG:AF 22 68 DF C9 ӨӨ 00 09:91 
D8Co:zE 07 32 Әр DF ЗА 15 DF:971 
DBCBkCD EO D7 C9 00 00 бө eo:1D 
D8De:21 Ee DA ЗА өз ра 57 1Е:60 
DOD8:G0 41 EO ӨӨ ED BO CD Со: ФВ 
рвЕФ: 08 CD ғә D7 CD СВ D7 (59:41 
D8EB:CD ЕЗ 1E C9 ЗЕ OA DI 40:22 
DBF9iSE 10 DZ Аі ЗЕ ӘС ОЗ А0:7Ғ 
DOF8:3E 96 D à1 C9 ӨӨ Од 00:81 


DB20:00 Có СӨ Co FC CO 18 00:14 
рвов:оо 00 CO CO Cé Có СӘ 18:Е4 


D9eo:CD 46 DA CD 86 ра CD 68:77 ов: GO оо оо OO оо өс COCA ррвв:ор о? Өз Өз дө の 6 O6 96:24 


DD の Or 06 оо дь O6 об ӨЗ ӨЗ ӨЗ:29 
DD98:03 өз өз OZ ӨХ ӨЗ ӨЗ O3:18 


— — ーー ーー ーー — stees ممست‎ somen ーー ーー ボーーー ーーーー ане сея сез 


DESBsCO CO 18 18 ӨӨ ӨӨ HO OO: BO 
DB4GsOO 7C СО FE Dé FE Go O0: OE 
DBA48:00 од 7C CO Có FC FE eGo:FC 
DESG: оо OO oO оо оо ое OO Cos Co 
DBS8:FE FE 18 ee oo eoo 00 OO: 14 
DBóO:GOQ оо Co CO DE СО Go 60:24 
рвов: до оо до Се Có 08 Có e0:24 
DE70: OQ оо GO OO ec eo OO Cos: Co 
DB78:CO Co 18 ӨӨ oo ӨӨ eo 20:98 
'DB8G:00 Cé Có Сё CE СӘ 18 QƏ:F2 
DEB8:00 оо Ce Có Có CC Có 18:Ғ6 
DEE: OG ос оо оо оо оо oO се: CO 
оо: BO 


ров: ра за e5 DF A7 СӨ CD F8:1E 
рә19:ре са о5 DF А7 Ce CD 50:78 
D918:D5 CD 99 Dé 3A eS DF A7:CD 


22 49 CE FD СА BS А5 ó6B:C3 


つじ 2A 2U 32 56,5% 25 ТБЗ 


Gum: 


Sum: 
ррас:оср 01 әу әу оі оі O7 87:21 
DDA8:01 01 O7 97 Or O1 96 ҒЕ:17 
DDEGsFF Оо Оо оз оо оо OO OO FF 
DDES: 00 оо оо оо OO оо OO OO: O0 
DDCGg до оо H6 Hé GÓ до 06 96:20 
DDC8:06 O6 05 OZ O2 өз O2 Ө2:1С 
DDDe:o?2 o2 02 O2 өз ӨЗ ӨЗ 05:17 
DDD8:605 ос 45 05 o5 05 ОБ 05:28 
DDEes:oó 97 01 01 97 07 01 O1:1F 
DDE8:07 07 O61 01 07 07 O2 FF: u. 
DDFe:FF со oo оо оо бб оо OO:FF 
ppF8: oo оо оо әс оо оо OO OO: OC 
DEGOsOF EO 27 ЕВ 6C 7C 08 3E:1C 


D92eG:Có CD АВ D4 ЗА 05 DF A7:CE 
р0928:С0 CD ЕВ Dé ЗА eS DF 7:20 
D9ze:Ce CD 48 07 CD 19 D7. CD:2D 
D938:5e6 DB CD 79 DB CD 86 D9:63 
D949sCD 46 ра CD вә D4 CD 58:77 
D948:D4 ZA ӘЗ DF А7 Cë CD РӨ: 1Е 
р950:ро ЗА 095 DF А7 Ce CD 59:78 
0958:05 CD 96 Dé ЗА eS DF A7:CD 
D960:COó CD AB D4 СА ӨЗ DF A7:CE 
D968:COó CD ЕВ Dé 3A ӘЗ DF А7:29 
рә7ә:сә CD 48 D7 CD 10 D7 CD:2D 
D978:506 DB CD 8e D9 C3 бө D9:Eñ 


DBAO:GO 7C 7C FE Có FE 18 Góo:Dz 
DBA8:06O0 оо 7C 7C 7C Сё FE 18:56 


рве: za 18 DF 47 C5 @& 20 19:72 DBBO:OQ ос оо оо OO ос OO FE:FE DEGBIFC 7E 7C 7C ЗЕ F8 OF FORT 


DE16:C2 45 52 4C Өр Бо 07 Е9:27 
DE18:02 40 OE 70 52 CC C1 83:03 


Sum: F@ 94 15 бё ©9 16 DI a9:EC 


DEEBO:FE СӨ 18 18 eo 00 00 OO:EE 
DEBCO:18 19 БЕ FB FF FB 76 3C: 3D 
DBCO:3F OC 1E 35 CD ZB 76 0C:28 
рвре: ЗЕ 68 14 12 22 DC DC 1C:62 
DED8:7C 106 7C AA Dé AA Dé 7C:84 
ЮВЕФ: 3C 66 7E 3C 18 18 ІС 18700 
ЮВЕВ: 00 CZ 24 3C 7E DB FF 66:Е1 
DBFG:7E DE DB 3C 66 C3 E7 FF:7F 
DBF8:14 24 2A 52 56 Ар BS SA:CA 
рсоәо:ог O2 Өз O4 өз ӨЗ O4 03:18 
рсов:о2 02 の 1 OO 01 O1 ÖÖ 01:08 


a 


D988:FE Сі 19 ЕВ C9 00 CS F5:4ñ 
р9909:р5 ЕЗ FD ES ЗА 19 DF 47:75 
D998:C4 AG D9 FD El C3 78 ӨҒ:65 


o өше эшме өле «ее coniò чо чын» omnes aimma бето (еме cuneo сооко ӨН» өлме эн‏ سے سے سے сао‏ مہ متت کے مت ج کے لیے 


DE20:43 C2 AZ С? 26 64 24 24:DC 
DE28:1D BB 26 64 23 C4 21 B4:EE 
DEZó:41 94 41 94 52 98 IF ЕФ:64 
DEZ8:0C 60 16 DƏ 13 99 11 10:16 
DE40:01 әс ©1 од O1 00 83 82:08 
DE4B:B4 42 86 C2 BF ҒА FF FE:C4 
DESG:10 38 30 19 19 10 19 10:CB8 
DES8:02 02 07 @2 02 ӨЗ 07 00:18 
DE ら 6G аә оо ao eo са oo ago QQ а 
DE&68:00 o0 O о oO оо oO eo GA: AA 
DE70:FF ee FF o1 Өө e1 @1 1:02 
DE78:01 00 ©1 FF @9 FF FF FF:FE 
DEBGO:51 OC 19 Zo Ә0 oO FÖ 1Е:С4 


D9àó6:3à8 ІА DF 3C Её ӨЕ 22 1A:B0 
р9АВ: рЕ Ce ZA 1B DF 5С Еб 1F:14 
рәве: 5р 1B DF FD 2А 1C DF 32:80 
D9ES8:BC D9 FD 7E @5 FE FF 28:326 
D9Có:09 47 ZE 99 DI аб 78 05:99 
D9C8:41 C9 АЕ 22 1B DF C9 ёё: ФЕ 
D9Dó:AF 32 14 DF ЕЗ 21 BE 09:55 
D9D83:22 оо ҒА FB C9 00 090 09:Е6 
р9ЕФ: ТА 15 DF FE 17 20 98 CE:46 
D9E8:3F Cé 04 22 94 DF C9 50:24 
D9Fo:EAó6 97 Có 94 32 94 DF С9:95 
D9F8:z60 15 DF 06 бө FE 11 50:72 


—— esum езе کے سے‎ еее s... опоо s... mesh өкше өше ом» еме» ескі» аюы» емее «кие өше «еме емес өзә» еее asoca asime. өте өкше sante cn 


Sum: 


DC2e:02 
DC28:072 07 01 OO 01 01 FF 90:06 


DAé6o:o?2 об 91 FE Өр Ze o2 G6:4C DCzo:oQ ос бө оо оо оо OO OO: O0 DE88:00 оо 19 50 61 OC OO BOEG 
Daáeg:oz FE 09 50 Ф? O66 OF ҒЕ:АҒ DOZE: OO оо оо оо оо оо догоо 0Е90:7С Có Có Сё Có Có 7C 00:Dó 


DE98:18 38 18 18 18 18 3C GO:EC 


Z9 64 ВЕ ӨС Ad 46 BA 56:29 


DCAG:GÓ6 ов әз o4 o5 ӨЗ o4 оз:26 
DC48:06 O4 97 OO O7 07 СО 07:28 
рс5о:ов ов O5 o4 оз o5 G4 о5:28 
DC58:066 06 07 o0 07 07 00 07:28 
DCóO:G6 ов o5 04 о5 o5 94 05:28 
DCó8:046 о6 07 ӨӨ 07 O7 FF eo: で の 
DC760:00 осо OO оо OO оо GO AGs OO 
DC78:00 оо оо OO OO OO OO оогоо 
DCBOE 02 о? өз өз O2 өз өз ӨЗ:15 
DC88:04 O3 о4 O4 Ә5 04 04 05:21 
DC9o:05 G6 O6 O5 O6 O6 06 O7:2F 
Q0: 21 


RA 


раід: оз зө Өз оь ІР 78 32 52:56 
рА18:р5 C9 ӨӨ оо оо 00 OO OO:9E 


ев «== еме мез cosso өзгө» s... s... моо conab Өрө s... өзө» өрөө s. s... «еее choco s... s... sosoo (еее coope өшее өзен «ме» емен cosan commo s... 


ЕЗ ЗА Ва 55 19 C4 C9 96:1D 


Sum: 


бит: 


DEAe:7C Có Có 06 38 ЕО FE 09:24 
DEA8:7C СЬ Có 1E Có Có 7C 00 2E 
DEBO:GC 5С CC CC CC FE ӨС 09:В6 
DEBBkFE СӨ СӨ FC 06 Фо FC 00:82 
DECe:7C Có СӨ FC Có Có 7C 00:06 
DECO:FE Cé Có ӨС 18 18 18 OO:DE 
DEDe:7C Có Có 7C Có Сё 7C eo:8C 
DED8:7C Cé Cé 7E 96 Có 7C ӨӨ:СЕ 
DEEOG:GO0 10 92 АА FC 00 OO 00:48 
DEE8:92 54 o0 СЬ 90 54 92 00:92 
DEFe:22 АЕ 35 45 56 34 47 36:DZ2 
DEF8:24 22 ӨӨ оз оо оо OO 99:56 


эрер өне өюев олы» өше ossee өнне ңес simpo. costo csoma. cosso andia еме sonso aumoa өзм» unku ampon «ғи» hun «ато овое‏ ممم esos өем» óseos овоо өендә‏ سے 


DA20:34 15 DF FE 17 20 12 47:СС 
DA28:3bE 10 90 СВ ЗЕ 87 47 87:50 
разе: во 87 oo Có 89 22 18 DF:76 
DAZ8:C9 ЗЕ 80 52 18 DF C9 60:79 
радо: 3A 15 DF 3D 47 Еб 61 26:С1 
DA48:0E 78 CB ЗЕ Бо 07 52 17:С6 
разд: ре ЗЕ 91 32 97 DF C9 AFTAE 
DASE: 52 @7 DF C9 бө 00 00 GMEL 
раё: За 15 DF FE 11 38 @8 ZD:BA ` 
DA68:E6 ӨЗ 32 1E DF 18 68 20:75 
DA zo: GE SF СВ 3F 52 1E DF 00:42 
DA78:6F 26 00 29 29 29 29 ES:1E 


рса: OO c aco € 
рсАв:оә оо оо до OO оо оо оса HA 


DA8Oo:01 оо DE o9 22 ORB DF E1:D5 DCEBG GO oa oo сс оз со oo бө OO Gum: ЭС 75 F1 АЗ AC 9C EZ 5 


"DCE: 00 оо оо оо оо oO OO бобо 
рссо:ов ов 66 45 G6 o6 OS GS 2D 
DCC8:04 45 04 94 ӨЗ O4 04 ОЗІН 
DCDe:ez 02 ор оз o2 Фі өз 01:11 


DA88:29 ES 01 FO D2 99 22 1C:18 
DAŞG: DF El 29 29 91 @@ DC 99:ҒВ. 


OFM-7 


BASIC + ¥ 778 


ソン ソフトウェア に よる スク ロー ル に 挑戦 し 
て み ま し た . いか が な も ん で し ょ う . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 6Ғ00--7696 


よ ょ うな も の で す . 知ら な い 人 の だ め に 説明 
する と , ヘリ コ プ タ を 操り 敵 基地 を 爆撃 す 
る と いう も の で , キー は [8], [2] で 上 下 へ 
1 キャ ラク タ 分 動き , [7], [1| で 動き を 続 
け ま す . また 爆撃 は BREAK| キ ー で す . 

クロ ッ ク は 4MHz に し て くだ さい . Ж 
め 遅 く 感 じ る か も し れ ま せん が , 基地 を 破 
壊す る ご と に 速く な っ て いき ます . 


— v. 


б 


スク ロー ル に は けり スタ ッ ク を 使っ て 
化し て いま す . まだ NMI が ある の で S ス タ 
ッ ク は 使っ て いま せん . ゲー ム で は 1 ドッ 
ト お な き に し か スク ロー ルン させ て いま せん . 


な お 。 [CTRL]+[c] で ゲー ム を 終わ る こと 
が で きま す が , [BREAK] が 効き さま せん . 


英 基地 か ら の 攻撃 は よ け る の が 難し い 


| スク ロー ル が 速く て 良い の で す が , 
| 敵 の 数 が 多 す ぎ て 難し すぎ る よう な 
気 が し ます . (key) 


KEV 7 8-uP 


この プロ グラ ム は BASE- 09 を 使っ て 作 
成 し ま し だ た . スク ロー ル ・ ブ ログ ラム を 継 
ЛІС Есе, ササ デ CPU に 一 度 デ 
“Ж を 迄 つて いま す : まり すま ねじ で を ら 
いだく な い 方 法 で す . 


_BASIC 部 (リス ト 1) と マシ ン 語 部 (リス 


ト 2) を 順に 入力 し 、 セ モー し て 写 い て < 3 参考 文献 * 
25, そう すれ ば 次 回 か ら は RUN 7” JF2PAR: “VIC で マシ ン 語 を ”, 


I/O, ” 81 年 9 月 号 


| RETURN| で ゲー ム が スタ ー ト し ます . 


ゲー ム は PC 版 と VIC 版 を 掛け 合わ せ た 


リス ト 1 地獄 の 上 黙示録 BASIC リス ト 


O, 11, 6S 
10020 DATA 624, 1665,-52199,-445,-7154,- 
52768,-32764, 7970 

10030 DATA 5655,-7169,-22450, 2176, 7168 


S СІЕАКЗОО,%НФЕЕР 

10 WIDTH40,25:DEFINT A-Z 
20 НІ=0 

30 GOSUB20000: LOCATEO,10 


20020 RESTORE 10000:FO0R 1=O TOAZ:READ J 
(1): NEXT 
20030 RESTORE 11000: FOR I-O TO6 
(І):МЕХТ 


:READ М 


45 LINE(0O,196)-(639,196) ,PSET,4 , 2048, 16642, 27 20040 RESTORE 12000:FOR I-O TOS8:READ М 
46 ІМЕ (0,68) – (659,48) ,PSET,4 10040 DATA- 7682, 16, 16384, 6556, 128, 1 (1): МЕХТ 
SO LOCATE15,23:PRINT"HIT ANY KEY'" 488, 16, 26616 20045 Xz100:Yz15 


60 A$-INKEY$:A$-INPUT$(1) 10050 DATA 28679,-51744, 16433, 614, 558 20050 РОТЕ (Х+1,ү+1) -(CX*58, Y*12) ,J,PSET, 1 
70 LINE(0,69) -(639,195) ,PRESET, , BF 4,-52752, 12352,-20358 20055 PUTG(X,Y)-(X*57,Y*11) , J,PSET,7 

80 HITzO: TIME$-"OO:00:00" 10060 DATA 51,-464, 4056, 3843 20060 PUTe(X*58,Y*6) -(X*72,Y*12) ,N,FSET, 
100 EXEC &H7000 11000 size 15, 7 R 7ints  14bytes : 1 

110 А-РЕЕК(%НФҒЕ2) NO 20065 РОТЕ (Х+57 ,Ү+5) - (X*71, Y*11) ,N,PSET, 
120 IF 4-2 THEN 1000 11010 DATA 4032,-6524, 1052, 2076, 4145, 7 

150 IF А-5 THEN PRINT" ABORT":POKE &HF DO 17281, 2062 20070 PUTG(X*73,Y*1)-(X*150,Y*12) ,M,PSET 
2,0: END 12000 size 78, 12 R S9ints  117byte 41 

140 LOCATE15,10:PRINT"GAME OVER" s :MOKUJIROKU 20075 РОТЕ (Х+72,Ү) -(X*149, Y*11) ,M,PSET,7 
150 LOCATE13,12:PRINT USING "HIT #####"; 12010 DATA 8184, 4552, O, 64, О, 17952, 20080 LOCATE20,2:PRINT"KEY 7 8 - UP"; 
HIT 17920, 32752 20090 LOCATE25,3:PRINT"! 1"; 

160 LUCATE1 さ 。14:FRINT "TIME ";TIME$ 12020 DATA 641,-511,-127, 2048, 0, 4352, 20100 LOCATE25,4:PRINT"1 2 - DOWN"; 

170 IF HIT2HI THEN HI-HIT:LOCATE10,17:PR 2052, 25215 20110 LOCATE25,S5:PRINT"BREAK - BOMB"; 
INT"You are best player." 12030 DATA-8192, 0,-497,-8161,-2052, 511 20120 IF PEEK(&H7000) -&H14 THEN 20160 
180 LOCATE13,20:PRINT USING "HIGH SCORE ;,-60, 17408 20130 LOCATE10,20:PRINT"LOADING MACHINER 
#####":HI 12040 DATA-32762, 96, 2, 7,-12289,-7937, y. 

190 POKE &HFDO2,0:GOTO 45 704, 8 20140 LOADM 

1000 HIT-HIT*1:POKE &H6FE7,RND(1)3*256 12050 DATA 4, 64, 96, 4288, 546, 18, 125 || 20150 LOCATE10O,20:PRINT" 

1010 SOUND 12,0 68, 32766 А 

1020 Ү-РЕЕК(%Н6ҒЕ9) #8 12060 DATA-32320, 28807, 592, 13696, 126 || 20160 

1050 LINE (560,Y) —(575,Y) , AND, 75, 6151, 1543, 1408 20170 RESTORE 20200 

1110 EXEC &H7056 12070 DATA-27901,—-30962, 14384, 14343, 4 || 20180 READ A,B:IF А<14 THEN SOUND A,E: GO 
1120 GOTO110 044,-14532, 3612, 30720 TO20180 

10000 size 58, 12 R 44ints  87bytes 12080 DATA 8195,-8095, 1792 20190۰ RETURN 


:JIGOKU 
10010 DATA 1024, 8198, 2528, 8195, 8, 11 


20200 DATA о,о, 
О.О. 


20000 init screen 
20010 DIM Ј (44) ,N(7),M(59) 


リス トク 地獄 の 黙示 録 マシ ン 語 リ スト 』 


+E 
9o 
оо 
оо 
оо 
оо 
оо 


1,200, 
8,16, 


6,31, 
15,0 


7,246, 11,0 


Add 

6F00 
6F10 
6F20 


*4 
41 
оо 
OO 
OO 
OO 
оо 


ға 
4D 
OO 
оо 
оо 
оо 
оо 


ж 
55 
оо 
оо 
оо 
оо 
оо 


+E 
9 
OO 
O1 
оо 
оо OO 
оо OO 


+Е 
64 
оо 
оо 
оо 
оо 
оо 


оо 
оо 
оо 
OO 


OO 
OO 
OO 
OO 
OO 
OO 
OO 


оо 
оо 
оо 
оо 
оо 
оо 
оо 


оо 
оо 
оо 
оо 
оо 
оо 
оо 


OO 
oo 
OO 
оо 
оо 
оо 
оо 


оо 
оо 
оо 
оо 
оо 
оо 
оо 


: OO 
: 00 
:00 
: OO 
:00 
: OO 
:00 


Sum 
: CA 
: B8 
:01 
: OO 
: 00 
: OO 


6F 30 
6F4O 
ФЕЗО 


оо 
оо 
OO 


を も し も し , PiOPiO で すか 2? 俺 は CREAM SODA で す . PiO3 月 号 で は つい に ソノ シー ト が 2 枚 に な っ ちゃ っ た . 5 月 号 に は 3 枚 に な っ た り 5 
LT. いっ そ 別 拓 で も 作れ ば いい の に . SOFT は COMPAC. それ に レー ベル も 付け れ ば 売切れ 続出 間 違 無し / PS1 プロ グラ ム を 作り た 
だ れ か お すす め の 本 が あっ た ら お せ ー て /( ち な み に 俺 は X1 ゆ う ざ あ で す YO/) 

(CREAM SODA) 


ОО (О) 
Ол 
PA ZzW.v4 BUT BASIC も ろく に 知ら な い ノ 


оо 
oo 
OO 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


Add 

7000 
7010 
7020 
7030 
7040 
7050 
7060 
7070 
7080 
7090 
70A0 
70BO 
70CO 
70DO 
7OEO 
7OFO 


Ааа 

7200 
7210 
7220 
7250 
7240 
7250 
7260 
7270 
7280 
7290 
7260 


Add 

7300 
7310 
7320 


m e. 


т 
ч ° ч 
A 


x > 
r Y 


A 


АА А. 
PC_-BOOO シ リー ズ 用 


> 
Y 
4 


з, 


フラ グ 表 示 プ ログ ラム 


これ は Z80 の フラ グ の 状態 を 調 で る だ め 
ЕАС, 


や り 方 は EXEC&HDOOO と し て くだ きい . 


テテ 
Ж, "8.2527, PAVE 
4. そし て フラ グ の 値 は 各 フ ラグ 名 の 真下 
に 表示 きれ て いま す . 

な お 。 この プログ ラム は サロ ケー タデ ブル 
CT. іг, この ブログ ラム は Z80CPU を 


umi adimi Ln a D 
MASSEN Жар 0 


pio 


リス トク 2 地獄 の 黙示 録 マシ ン 語 リ スト 


7550 
7340 
7550 
7360 : 
7370 
7380 
7390 : 
73600 
75во 


А 


(А (А (А C4 CA Á 


さ 
x 
3 
3 
3 


оо 
оз 
оо 
оо 
OF 
Оо 
оо 
oo 
оо 


06 13 


222222222222: 


SN 


» の = 
モー ド 1 一 4 vu 


өйүн 


8 フラ グ 表 示 プ ログ ラム т, А КЙ 


75:8A 
55:74 


Js 


19:22 


持つ マイ コン へ 簡単 に 移植 で きま す . 
・PC-6001 の ROM 内 ルー チン の 1075 是 番地 
は 1 文字 出力 で す . 


родо: FS 
0008: 10 
D919』 CD 


・ こ の プロ グラ ム の アド レス DO019H 番 地 の D618:3E CD: B2 
値 を HOD k, 7 Ev ADOIEH # H O fii & ا‎ 
НОА は PC-6001 で は 行 替え する コー ド で Deze: 28 

DO38:CB 
3. 0049: ЗЕ 
ロロ 参考 文献 “PC-8001 マ シン 語 入門 " —Ó 
電波 新聞 社 


103 


Q 


FM-7 


BASIC ж »" 
ӨТЕР 


2 
ph WY 
„7 МА 


2% 


м 2‏ 
کے اا 


ug... 


SCORE 


一 DAISUKE. К. 


70302 7 


2090 ө ө ө 
000000 000 
фоофе 6% 


今日 も サー カス は 満員 御礼 . ノ 

ビエ ロ 君 の 仕事 に も 精 が 入り ます . T, 
ビエ ロ 君 の 見 せ 物 は 何かと いう と, sot, 
空中 プ ブラ ンコ より も 危険 な 「 空 中 風船 渡り 」 
な ん で す . ぎょ えっ. 
圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


昔 か ら あ る アイ デア で す が , オー ル 
BASIC に し て は 動き も よく て 楽し め 
ET: (key) 


ォ ー ル BASIC で す の で リス ト 1 を 普通 
に 打ち 込ん で くだ さい . な ん だ か 相当 長い 
よう に も 見 えま す が , 本 当 に 長い ん で す . 
気 を 確か に し て 打っ て くだ る さい. 

それ で も 打ち や する を 考え て ある ブログ 
ラム (?) の つも りな の で , 割合 簡単 に 打 て 
る と 思い ます . これ を 全部 打 て ば 根性 が 付 
A a 


な , IA t BASICO 2 61: 8 ili š C 5 
り ま す : 8 面 ま で いく と 1 面 に 戻り ます . 
どう や る と この ゲー ム が 終わ る か と いい ま 
TE, あな ただ の 不手際 で ビ ピエロ を すべ で て 惨 
БЗ ъъ, それ と も あな だ が 点 を 取り 過ぎ 
C, Шіл, オー バー フロ ー を 出す と 
終わ り に な り ま す 。 も し オー バー フロ ー に 


な っ だ ら ご めん な る さい. 
ピエ ロ 君 は |4||5|[e| キ ー で 操作 し ます 
が 。 この ゲー ム に は 色々 と や や こし い ル ー 


' РІЕККОТ THEME 
P$-"SOMSOOOT200L4" 

PLAY P$«"OS",P$«"O04",P$-"04V15" 
P1$-"DFFE2D2DEFG1R2" 
P2$-"DFFE2D2DEDC1R2" 


F3$-"A2G2FEDCD2EFG2A6" 
F4$z"AGFEGFEDFEDCDEC2D1 " 
PS5$-"DFAFDFAFCEGECEGE " 
FLAY F1$,F1$,F5$ 


ル が あり ます . 適当 に 列挙 し て み ま し ょ う . 
⑳ ビ エロ 君 を ビー カー だ か な ん だ か よく わ 
か ら な い 水 の 所 に も っ て いく と ボー ナス が 
も ら え , 次 の 面 に 進め ます . 
@ ピ エロ 君 の 体 が 地面 に た た きつ けら れ た 
9, 天 堪 に ぶち 当 だ っ たり 。 は だ また ムラ 
サキ 色 の プ ブロック やや 風船 に 接触 する と ピエ 
ロ 君 が 1 人 減り ます . ちな み に , 2 万 点 で 
1 人 増え , 以後 毎 3 万 点 ず つ で 1 人 増え ま 
7; 
⑧9 表 が 風船 の 得点 な ど で す . 

表 得点 表 

ボ ポイ ント お よび 内 容 


10PTS 
50PTS 
200PTS 
50--500РТ5 


50--500РТ5 
1000РТ5 

跳ね る だ け 
死ぬ だ け 

死ぬ だ け 

反動 を や わら げ る 


⑱ い くら ビ ピエロ 君 を 水 の 所 まで 持っ て いっ 
Cb, チェ ッ ク ・ バ ルー ン を 取ら な いと 元 
の 所 へ 戻っ て し まい ます . 有 要 注 意 / (代わ 
り に だ だ の 水色 の 風船 を 取っ て も よい . о 
まり S マ ー ク の 風船 の 数 だ け 水 色 の 風船 を 
取れ ば よい の で す ) 

ビエ ロ 君 が 落下 し , あま り 速 度 を つけ 過 
ぎ て し まう と , 風船 を 素通り し て し まう こ 
と が あり ます .。 悪し か ら ず 。 


デモ の 文字 は PRINT 文 を 使わ ず , 
SYMBOL 文 を 使い お まけ に サブ ルー チ 
ン に 飛ば し て いる の で 少し ば か り 描 く の が 


遅い の で す が , 見 だ 目 は PRINT 文 より い 
い の で は な いで "し ょ うか ? 


リスト 1 PIERO BASIC! AF | 


Р2%,Р2%,Р5% 
Р1%,Р1%,Р5% 
Р35%,Р2%,"У14"%Р5% 
Р5%,Р5%, +Р5% 
Р2%,Р2%, +Р5% 
Р1%,Р1%, %Р5% 
Р4%,Р4%,"У15"%Р5%-"бОМЗОООр1" 
UR ac T SUNT 


次 の 風船 で 反動 を つけ て GO./ 


SCORE 200-- T 7 F 


же 
グラ ム を 付け て お きま す . RUN き る せ て か 
6, 好き な 文字 を 打ち 込ん で, 
キー を 押す と 表示 きれ ます . 

この 手法 ( ? ) で 文字 の サイ ズ を 変え た り 
する と , いろ ん な 文字 が 描け ます . 工夫 す 
る と コン ピュ ー タ 文字 みた だ いな の も 描け ま 


リス ト 2 に お まけ と し て サン ジッ ソレ ・ 


8, 
# > z 4 4 X++ O 2 2"`— PIE b 729 
っ だ ら ジ ャ ンジ ャ ン 使 いま し ょ う . 


初め に 流れ る 音楽 (?) と いい , 色々 と ム 
婦 が 目立つ プロ グラ ム で す が , マシ ン 語 の 
で き な い 作者 の 性 , 思わ ず 画 面 の きれ いな 
プロ グラ ム を , と いう 訳 で 巨大 な プロ グラ 
ム に な っ て し まい まし だ た だ. 

あと 8 面 ま で い っ て し まっ た だ ら 。,。 今度 は 
全面 パー フェ クト を 狙っ て みて くだ さい . 
ちゃ ん と 全面 で きる よう に 作っ て あり ます . 
し か し , あま り 長 く 〈 や る と 目 も 悪く な り ま 
TL, 性 格 が 暗く な っ だ た だり し ます の で , を 
この と ころ は 適当 に . 


3 参考 文献 
Ж пі: “ 森 く ん の ゲー ムコ レク ショ 
v PARTI РУ 5 Ria 


ШЕГЕ! 


BY DAISUKE.K. 


n 49847; 6/22 


Ryoko さ ん へ .。 3 月 全 p40 の イラ スト で ,「 ペ ン ネ ー ム を 変え な けれ ば …」 と 思っ て いる そう で す が , あな た だ は 極め て 知名 度 が 高い か ら 変 


(私 は BLUE-AND-BLUE, WATER-LAKE と 完全 同一 人 物 だ よ の “MY-LIIFE-PASOPIA-SEVEN") 


тт 
ө, өз 
えな い 方 が ファ ン の た め に も いい の で は な いか と 思い ます . LDL, ГЕТ S OC と いう 気持 ち は 私 も わか り ま す .。 私 と し て は 。 あ な 
だ だ と わか る よう に ペン ネー ム を 変え て くれ る な ら 大 符 成 で す . まあ , 私 が 日 を 出す 必要 は まっ た く な い の で す が . 
ша СОЗ”) 


280 
290 
zoo 
510 
520 
550 
540 
390 
560 
570 
i80 
590 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 


200 


510 


220 
S30 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 


: 640 


650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 


“850 


860 
870 
880 
890 
900 
910 
920 
950 
940 
950 
960 
970 
980 
990 


1000 
1010 


DEFINT A-Z :RANDOMIZE TIME/4 

FOR Ісі ТО 7:COLOR-(I,I)?:NEXT 
ТР=965 :TP$-"DAISUKE.K." 

WIDTH 40,25 :CONSOLE 0,25,0,0 

PLAY "SOM5OOOT255L さ 205CEBCEBCEBCEG" 


DIM P14(93),P2X(93) 


DIM BLX(59) ,CBZ(178) МУ (7) 


DIM F1$(15),P2$(15) ,F3$ (15) 


CLS 

PRINT 

PRINT 

PRINT 

PRINT 

бете (0,0) - (3,3) ,ULX 
COLOR 7,0:CLS 


CIRCLE (100,100) ,16,1,.6, ,,F 
CIRCLE (105,117) 。 さ 。1 
LINE(100,100)-(102,117) ,PSET, 1 
BET@ (82,91)-(116,118) , BLX,G 


RESTORE 680 


Ј=0 

FOR I-1 TO 3 

READ Р1%,Р2%,Р3% 

FOR 4-02 TO J+3 
Fi$(J)-F1$ :P2$(J)-F2$ 
NEXT :NEXT 


:P3$(J)=F3$ 


READ Р1%,Р2%,ҒР3% 

FOR J=J TO J+2 
Fi$(J)=Fi$ :P2$(J)=P2%$ 
NEXT 
READ 


:Р3%(0)-Р3% 
P1$(J) ,F2$(J) ,F3$(J) 


DATA AGFE 
DATA AGFE  ,FEDC 
DATA AGFE  ,FEDC 
DATA EE+FF+,FEDC 
DATA EE+FF+,FEDC 


,AGFE  ,FEDC 
,FEDC 
。 CC+DD+ 
, CC+DD+ 


,CEGE 
РАІМТ (100,100) ,5,0 


Х=91 :Ү=97 :С=0 
ЕФ= "с" 
GOSUB 5590 


GETEA (85,91) – (116,118) ,CEX,G 
RESTORE 6560 


FOR І=0 TO 97 
READ Р1%(1) 
NEXT 


FOR I-O TO 93 
READ Р27(1) 


COLOR 7,0:CLS 
P$-"JUMPING PIERO" 
SYMBOL( 98, 24),Р%,4,5,7 
SYMBOL (102, 26) ,Р%,4,2,1 
SYMBOL (100, 25),P$,4,3,5 


RESTORE 1080 


1020 FOR 1=1 TO 4 


1030 
1040 
1050 
1060 
1070 
1080 


READ C 

X=40+ (I MOD 2) *3O 

Yz40-4I #20 

РОТЕ (X,Y)-(X*32,Y*27) ,BLX,PSET,C 
NEXT 

DATA :1,2,4,7 


1090 FUTGA(70,140)—(103,167) „СВУ ,РБЕТ 
1100... 
1110 COLOR 5 


1120 
1130 
1140 
1150 
1160 


LOCATE 
LOCATE 


25,15:РКІМТ 
25,16:PRINT 
LOCATE 25,17:PRINT 
LOCATE 25,18:FRINT 
РАІМТ(410,155),1,5 


1170 FOR Ізі TO 3 


1180 
1190 
1200 
1210 
1220 
1220 
1240 
1290 
1260 
1270 
1280 
1290 
1500 
1510 
1520 
1530 


1540 


SYMBOL (409%1,128),"!", 
МЕХТ 


FOR I-O TO 18 STEP 18 

COLOR -(Is0)*6-(I-18)*1 
LOCATE 2-1,20:PRINT " ,——s"; 
LOCATE 2+1,21:РКІМТ " 1 1"; 
LOCATE 2+1 ,22:РКІМТ " 
МЕХТ 

PAINT( 46,165) ,6 
FAINT (334,165) ,1 


Х=125 :Yz170 :C=5 ç 
F$=CHR%$ (30) +" CUSHION "+СНКФ (51) 
GOSUB $590 


RESTORE 1430 :READ D 


1350 


1560 
1570 
1580 
1390 
1400 
1410 
1420 
1420 
1440 
1450 
1450 
1470 
1480 
1490 
1500 
1510 
1520 
1550 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 


:2070 
2080 


2090 
2100 
2110 
2120 


2130 


2140 


2150 
2160 
2170 


: 2180 
“2190 


2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2510 
2320 
2330 


FOR 1=1 TO D 


READ X,Y,C,FP$ 
GOSUB 5590 


NEXT 
DATA 10 


DATA 350, 
DATA 352, 


50,2,MADE BY DAISUKE.K. 
51,7,МАрЕ BY DAISUKE.K. 
DATA 80, 70,7,BLUE 10 PTS 
DATA 80, 90,7,RED So FTS 
DATA 80,110,7,6КЕЕМ ... 200 PTS 
рата 80,150,2,МНІТЕ .. 1000 PTS 
DATA 80,150,5,СНЕСК ... MYSTERY 
DATA 400,100,5,PIERO 

DATA 200,190,6,PUSH RETURN KEY! 
DATA 400,155,1,WATER 


IF ІМКЕҮФ=СНКФ (15) THEN 1220 

IF TIME MOD 2=0 THEN 1590 
PUTGA(425,80) - (456,95) ,P1X,PSET 
GOTO 1550 

PUTEA (425,80) - (456,95) 。P2% 。 SET 
GOTO 1550 


LOCATE 0,24 
FOR I=1 TO 25:РКІМТ CHR$(7):NEXT 


РФ%-"ТОР-5СОКЕ" . 
X2200 :Ү=70 :С=1 : 60508 5590 
X2202 :Үш71 :C-7 : 60508 5590 
P$=""+STR$ (ТР) + "о" 

-200 :Ү=80 :C-3 : 608508 5590 
Х=202 :Ү=81 :C-5 : 60508 5590 
F$-"BY "«*TF$ 
Х=200 :Ү=90 :С-2 :GOSUB 
Х=202 :Ү=91 :C-7 :GOSURB 


5590 
5590 


РФ= "7255151804" 
F1$-"CAEGERBERB8DAC2R2" 
P2$-"DAFAFRBFR8G4E2R2" 

F さ $="LBFEDCFEDCFEDC2EG2" 
P4$-"L8AGFEAGFEAGFE2GOSC2" 
FLAY P$,P$ 

PLAY Р16%Р1%,Р2%-%Р2% 

PLAY PZ$,F4$ 


FOR 1=1 ТО 10000: NEXT 
FOR 1=1 TO SO:FRINT CHR$(7):NEXT 


P$-"SOMSOOOT255L8" 

PLAY P$*"04",P$-"OS5",P$*"06" 
PLAY "GA2B2" 
P$-"CEGECEGEDFAF AF DFGGGG61 " 
PLAY P$,"R"«P$,"R2"«P$ 


Х=200 :Ү=100 :C-RD MOD 7+1 
P$="R O U N D :"«*STR$ (RD) 
GOSUE 5590 


FOR I=1 TO 10000:NEXT 
FOR Ісі TO SO:FRINT:NEXT 


COLOR 5 :LOCATE 0,3 

FRINT USING " SCORE######0="; SC; 
COLOR 2 
PRINT USING "= T 0 Р######О=";ТР; 
COLOR 4 
FRINT USING 


"= ROUND ## "; RD; 


COLOR 5 


:LOCATE 0,24 
PRINT е" 


PRINT " —" 

PRINT "| L 

PRINT " —" 
РАІМТ(10,181),1,5 

FOR Ісі ТО 3 

SYMBOL (10%1,176),"!",2,2,7 
SYMBOL (80*1,190),"SA5FE'",2,1,2 
NEXT 


COLOR 4 :LOCATE 10,24 
PRINT STRING$(FR-1,"$");" "; 


COLOR 6 

LOCATE 34,22:PRINT ".,——."; 
LOCATE 24,23:PRINT "| 1"; 
LOCATE 24,24:PRINT “-"; 
PAINT (520,184) ,6 


ON (RD-1) MOD 8*1 GOSUE 2770,2780,2 


790,2800,2810,2820,2830,2840 


2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 


4 


READ A,B,C,D 


IF 4-0 THEN 
COLOR & 
FOR I-1 TO A 
READ X,Y 
LOCATE X,Y :РБІМТ 
LOCATE X,Y*1:PRINT 


2460 


2450 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2520 
2540 
2550 
2560 
2570 
2580 
970 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 
2770 
2780 
2790 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
2920 
2930 
2940 
2950 
2960 
2970 
2980 
2990 
3000 
5010 
3020 
озо 
3040 
3050 
3O60 
3070 
3080 
3090 
3100 
2110 
5120 
3130 
3140 
5150 
5160 
5170 
3180 
3190 
3200 
2210 
5220 
3230 
3240 
3470 
3290 
3260 
3270 
3280 
3290 
3300 
3310 
3320 
5550 
5240 
3350 
ささ 60 
さる 70 
3380 
5590 
3400 
3410 
3420 
5430 
5440 
3450 
5460 
5470 
3480 
3490 


BIO 


| リスト 1 PIERO BASIC! Z F 


"K "ng 


LOCATE X,Y-*2:FRINT 
PAINT ((X+1) #146, (Y+1) *8) ,6 
NEXT 


IF В=0 THEN 2560 
COLOR 1 

FOR I=1 TO B 
READ X 
LOCATE X, 
LOCATE X, 
LOCATE X, 
РАІМТ ((Х+1) +16, 


МЕХТ 


1:PRINT ",—— "3 
21PRINT "I 1" 
Z:iPRINT "— 
16) ,1 


IF С=О THEN 2620 

FOR I=1 TO C 

READ X,Y 

FUT@ (X,Y)-(X*3,Y*3) ,WLZ,11 
NEXT 


CB-O :BL-O 

IF D=O THEN 2760 

FOR Ісі TO D 

READ X,Y,C 

IF С<>2 AND С<>6 THEN BL=BL+1 
IF C=O THEN 2770 
FUTE (X,Y) -(X*22,Y*27) ,BLA,FSET,C 
GOTO 2730 

FUTEA (X,Y) -CX*33,Y*27) ,CE%, FSET 
CB=CB+ 1 

NEXT 

BO=EL 

GOTO 2860 


RESTORE 
RESTORE 
RESTORE 
RESTORE 
RESTORE 
RESTORE 
RESTORE 
RESTORE 


5680: RETURN 
5760: RETURN 
5870: RETURN 
5960: RETURN 
6030: RETURN 
6150: RETURN 
6260: RETURN 
6420: RETURN 


MAIN ROUTINE ===== 
CG=O 

X=600 :Ys55 :W-X :Z=Y :6210 :P=0 
PUTGA(X,Y) - (X431, Y*15) ,F24,PSET 


ІФ-ІМКЕҮ% 

IF I$-"" THEN 2950 

У-( (1%-"4")-(1%-"6")) #8 

G-G-2 :X=X+V :Y-Y-G 

IF Y«O OR Ү>184 THEN 4300 

IF Х<О OR Х>608 THEN У--У :X=X+V 


ON P GOTO 2020 
PUTGA(W,Z) -(W*31,Z2*15) ,F2Y., ХОБ 
GOTO 3040 

PUTGA(W,Z)—-(W*31,2415) ,F1X, XOR 


IF FOINT(X*16,Y*15)--1 THEN 5150 
IF 6>0 THEN Р=0 ELSE Р-1” 


ON Р GOTO 2100 
PUTGA(X,Y) -(X*31, Y*15) ,P2., XOR 
GOTO 3120 
PUTGA(X,Y) - X421, Y*15) ,P1X., XOR 


W-X $2-Y 
GOTO 2920 


REM ===== SUB 


IF X«68 AND Ү>156 THEN 2720 
FOR 1=1 TO 7 

COLOR ,I 

IF FOINT(X*16,Y*15)-0 THEN C-I 
NEXT :COLOR ‚О :FS=0 


ON C GOTO 3260,3320,3340, 3360,3380, 


, 2490 


IF Ү>28 THEN PS=1 :б-12 :650Т0 5590 
F$-"SOMSOOOT25S" :б-Оо 

PLAY P$«"O3S",P$-"0O4",Pt-"OS" 

FLAY "u GZ " * “ E2" " "O2 "K 

GOTO 3050 


:б-14 :GOTO 3590 


4300 
FS=20 :б-14 :GOTO 3590 


б=12 :FS=INT (RND (1) *10+1 ) #5 
PLAY "SOMSO00T255L3I205CEGECEGE" 
FS$=STRS$ (PS) +"O" 

FOR 1=1 TO 7 

SYMBOL (Х+1*#5,Ү),Р8%,2,1,1,,ХОК 
SYMBOL (X*I*3,Y) ,F8$,2,1,1,,XOR 
NEXT 

СВ=СВ-1 :GOTO 5600 


CG-CG MOD 6*1 :б-9%Сб : БОТО 2050 


. 


PS=100 :6=10 


pio 


リス ト 1 PIERO BASIC リ スト 


3500 Р%="у15Т2551 5205" 4580 FLAY "GFEDCDEFGFEDCR" 5660 ROUND DATA ===== 

3510 PLAY P$«"04",P$-"05",P$«-"06" 4590 ' 5670 

3520 P$="CDEFGABCDEFGABCDEFGAB" 4600 IF SC<=TF THEN 5140 S680 

3530 PLAY РФ,РФ,РФ 4610 P$-"sOm5000t25518" 5690 

3540 FOR 1=7 TO О STEP -i 4620 PLAY P$-"o4",P$-"Oo5",P$-"o5" 5700 

3550 SYMBOL (X,Y ," 1000",2,1,1,,XOR 4630 FOR I-1 TO 4 5710 100,150,4,200,150,2,300,150,4 
3560 NEXT 4640 PLAY "cegb","cdef","cccc" 5720 300,100,2,400,150,2,500,150,4 
5570 GOTO 3600 4650 PLAY "bgec","fedc","dddd" 5730 300, 50,0,150,150,53,250, 75,1 
5580 ' 4660 NEXT 5740 250,125,1 

3590 PLAY "SOMSOOOT255LZ20SCEGBCEGR" 4670 PLAY "c1*, "c1", "c1 9790 ' ROUND 2 

3600 SC=SC+FS :BL-BL-1 4680 FOR I-1 TO 10000:NEXT 5760 DATA 0,0,0,25 

5610 COLOR S:LOCATE О,О 4690 ' 5770 DATA 50, 60,2,100, 60,7,150, 60,1 
5620 PRINT USING " SCORE######0="; SC; 4700 REM ===== ENTER YOUR NAME ===== 5780 DATA 250, 60,4,350, 60,2,450, 60,6 
2650 PAINT(X*16,Y*15) ,0 4710 ° 5790 DATA SOO, 60,1,550, 60,1,400,150,4 
3640 ' 4720 CLS :TP2SC :TP$-"" 5800 DATA 100,100,3,150,100,3,200,100,3 
56950 IF SC-«EV THEN 2050 4730 ' 5810 DATA 250,100,5,500,100,5,400,100,2 
5660 РК-РК%1 :EV-EV4Z000 4740 X=160 :Y- 70 :С=6 5820 DATA 450,100,3,500,100,3,100,150,0 
3670 COLOR 4 :LOCATE 10,24 4750 P$z"ENTER YOUR NAME! '" 5850 DATA 200,150,2,250,150,0,300,150,1 
3680 PRINT STRING$(PR-1,"$'); 4760 GOSUB 5590 5840 DATA 450,150,6,500,150,5, 50,100,1 
3690 PLAY "SOMSOOOT255LAO06CCCCCCCC" 4770 * 5850 DATA 150,150,4 

2700 GOTO 3050 4780 X=160 :Ү= 80 :C=2 5860 ' ROUND 3 

Prion 4790 F$zSTRING$(10,"*") 5870 DATA 0,1,5,12 

5720 4800 GOSUB 5590 5880 DATA 25 

3730 4810 ' 5890 DATA 10,12,10,16,10,20 

5740 IF CB»O THEN 2890 4820 PF$-"SOMZOOOT230L8" S900 DATA 100,150,1,100,100,0,200, 50,2 
5750 РФл"У15Т725505 8" 4830 PLAY P$-"OS",F$-"04",P$-"05" 5910 DATA 250,100,4,300,140,2,350,120,6 
3760 Fi$-"CEGD FAEG EAGF EDC2" 4840 ' 5920 DATA 400, 80,4,450,120,0,500,130,4 
3770 P2$-"CRER GRBR" 4850 FOR 1=O TO 15 5950 DATA 500,170,4,400, 50,4,450, 50,4 
2780 PLAY РФ ,РФ+"50М500004" 4860 FLAY Р1%(1),Р2%(І),Р2%(1) 5940 DATA 300, 50,5 

3790 FLAY Р1%%Р1%,Р2%%Р2% 4870 I$-INKEY$ 5950 ' ROUND 4 

3800 PLAY "Gi1","E1" 4880 IF I$-"" THEN 5000 $960 DATA 0,0,0,12 

5810?” 4890 IF 1 まま < CHR ま (日 ) THEN 4920 5970 DATA 100,130,2,200,110,4,300,120,0 
2820 PUTEA( 25,163) - (56,178) ,P1X,PSET 4900 IF LEN(TF$)-0 THEN 4960 5980 DATA 400,130,4,500,140,4 

Z830 LINE( 80, 70)-(400,150) ,PSET,O,BF 4910 X-X-16 :C=0 :РФ-"Ш" :GOSUB 5590 5990 DATA 100, 80,64,200, 70,6 

2840 ' 4920 C-2 :РФ-"ж" :GOSUB 5590 6000 DATA 300, 60,7,400, 70,5,500, 80,0 
5850 Х=100 :Ү=80 :С=6 4930 TP$-LEFT$(TP$,LEN(TF$) –1) 6010 DATA 150, 50,4, 20, 40,0,450, 50,4 
5860 F*$="@@@ ROUND"«*STR$(RD)«*" еее" 4940 GOTO 5000 6020 ' ROUND 5 

5870 GOSUR 5590 4950 ' 6030 DATA 2,1,7,17 

3880 ' 4960 C-O :P$-"N" :GOSUB 5590 6040 DATA 25,22,29, 9 

3890 X=100 :Yz90 :С=2 4970 C24 :Р%-1% :GOSUB 5590 6050 DATA 29 

5900 F$-STRING$(17,"") 4980 ТР%-ТР%%1% :Х-Хғ16 6060 DATA 0,12, 4,12, 8,12,16,12,20,12 
3910 GOSUR 5590 4990 IF LEN(TF$)-10 THEN 5050 6070 DATA 24,12,32,12 

3920 ' . 5000 NEXT 6080 DATA 50, 60,0,100, 60,2,150, 60,4 
3930 X=100 :Y-2100 :С=5 :BO-(BO-BL)*10 5010 GOTO 4850 6090 DATA 200, 60,2,250, 60,4,500, 60,2 
3940 L-11-LEN(STR$ (BO) ) 5026 6100 DATA 350, 60,4,400, 60,2,200,100,4 
3950 P$-"BONUS"«SFACE$(L)-«*STR$ (GO) +"O" 5030 P$-"LS8O02C4CCCACCCACCCACCCACC " 6110 DATA 100,160,1,150,160,1,200,160,1 
3960 GOSUB 5590 5040 PLAY РФ+"ССССС1", "К", "Б" 6120 DATA 250,160, 1,300,160,1,450,100,0 
3970 SC=SC+BD 5050 FOR Ісі TO 148 6150 DATA 580,100,1,550,150,7 

3980 ' SO6O FOR 1-1 TO 100:NEXT 6140 ' ROUND 6 

2990 IF Ві >0 THEN 4040 5070 COLOR-(4,1 MOD 8) 6150 DATA 2,0,2,21 

4000 Х=100 :Үті10 :C-4 5080 NEXT 6160 DATA 10,10,10,15 

4010 РФ-"РЕБҒЕСТ!! 5000" 5090 ' 6170 БАТА 0, 9, 4, 9 

4020 GOSUE 5590 5100 PLAY "OSCEGCEGCEGCEGO&CI1R" 6180 DATA Ó 90,1, 80, 50,1,100, 50,1 
4050 SC=SC+5OO 5410 ' 6190 DATA 0,7048, 0, 90.6, 0,4120:7 
4040 ' 5120 FOR I=1 TO 5000: МЕХТ 6200 DATA 250,140,4,200,150,2,550,160,4 
4050 X=100 :Yz120 :C-2 5130; ° 6210 DATA 200, 50,0,250, 50,0,300, 50,0 
4060 F$zSTRING$(17,"*") 5140 REM ===== GAME OVER ===== 6220 DATA 400, 60,6,400, 90,1,450,110,5 
4070 GOSUB 5590 5150 ' 6230 DATA 100,120,7,500, 50,1,550, 60,7 
4080 ' 5160 FOR I-1 TO SO:PRINT:NEXT 6240 DATA 250,110,2,550, 90,1,550,120,1 
4090 Х=100 :Y=130 :C=3 $196." 6250 ' ROUND 7 

4100 L-11-LEN(STR$(SC)) 5180 PLAY Р1%,Р1%,Р5% 6260 DATA 0,0,0,40 

4110 P$z"SCORE"-«SPACE$(L)-«*STR$(SC) «"O" 5190 ' 6270 DATA 100, 50,1,150, 50,1,200, 

4120 GOSUB 5590 5200 P$-"GAME OVER" 6280 DATA 250, 50,1,300, 50,7,350, 

4130 ' 5210 SYMBOL (149,39) ,P$,4,2,7 6290 DATA 400, 50,232,450, 50,1,500, 

4140 5220 SYMBOL (151,41) ,Р%,4,5,1 6300 DATA 100, 80,1,150, 80,2,200, 

4150 COLOR S:LOCATE 0,0 5250 SYMBOL (150,40) ,Р%,4,2,5 6310 DATA 250, 80,4,200, 80,1,350, 

4160 PRINT USING " SCORESS4[4 4 40-7": SC; 5240 ' 6520 DATA 400, 80,1,450, 80,1,500, 

4170 ' 5250 РТЕА (564,80) – (595,95) ,Р1Х,РЅЕТ 6330 DATA 100,110,2,150,110,1,200,110,1 
4180 WHILE SC>EV 5250 ' 6340 DATA 250,110,1,200,110,1,250,110,1 
4190 PLAY "L6405CEGBCEGRCEGRBCEGRBR 1 " 5270 FOR Ісі TO 7 6350 DATA 400,110,1,450,110,1,500,110,1 
4200 FR=FR+ 1 :EV=EV+3000 5280 J=I*+30+100 6:560 DATA 100,140,1,150,140,4,200,140,1 
4210 COLOR A4:LOCATE 10,24 5290 PUTE (J,80)-(J*32,107) ,BLA,PSET,I 6370 DATA 250,140,2,300,140,5,350,140,0 
4220 PRINT STRING$(FR-1,"$"): 5300 NEXT 6380 DATA 400,140,0,450,140,4,500,140,% 
4230 WEND $319 ' 6390 DATA 50,110,0, 50,140,0,550,110,0 
4240 RD=RD+ 1 5520 PLAY P2$,P2$,P5$ 6400 DATA 550,140,0 

4250 ' $330 * 6410 ' ROUND 8 

4250 FOR Ізі TO 10000:NEXT 5540 РОТЕ (26,10) - (29,15) ,WLX,11 6420 DATA 2,2,2,20 

4270 FOR Ісі TO 5О:РКІМТ:МЕХТ 5550 “ 6430 DATA 10,10,15,10 

4280 GOTO 1910 S360 Х=200 :Ү=150 :C=3 6440 DATA 10,15 

4290 ' 5370 L-7-LEN(STR$ (SC) ) 6450 DATA 5,15, 9,15 

4300 5380 P$-"SCORE"-«SPACE$(L)-*STR$(SC) «"O" 6460 DATA Q, 50,0, 50, OG 80.1 
4310 5390 GOSUB 5590 470 DATA 425,100,2,300,100,1,350,100,2 
4320 5400 ' 6480 DATA 400, 80,232,450, 80,3,500,150,2 
4550 YzY4G :Х-Х-У :РК-РБ-і 5410 Х=200 :Y=140 :С=4 6490 DATA 250,150,0,300,150,1,425, 60,1 
4340 PLAY "У15Т2551 6405" 5420 L-7-LEN(STR$(TF)) 6500 DATA 425,150,2,500,150,2,500, 50,1 
4350 ' 5430 P$-"T О P"«SPACE$(L) *STR$(TP) "Оо" 6510 DATA 200, 50,2,250, 50,3,550,100,2 
4360 FOR Y=Y TO 184 STEF 5 5440 GOSUB 5590 6520 DATA 50,100,7, S0,130,1 

4370 PLAY "N"*STR$(INTCY/2)) S450 ' 6530 ' 

4380 LINE (W,Z2)-(W*31,Z2*15) ,FSET,O,BF 5460 Х-200 :Ү=150 :С=2 6540 PIERO DATA ===== 

4390 PUTGA(X,Y) 一 (X+ さ 1 。Y+15) ,F1X,PSET 5470 P$-"BY "«TP$ 6550 

4400 W-X 』Z=Y 5480 GOSUB 5590 6560 4 

4410 МЕХТ 5490 ' 6570 ,-1024 
4420 ' 5500 PLAY Р2%,Р2%,Р5% 6580 ‚ 511 
4430 P$-"SOMSOOOT200L8" 5510 “ 6590 52640, 510 
4440 F1$-"O3FEFEFCDCDCO2A-*41" 5520 Х-180 :Ү=190 』 ビ =6 6600 6: 

4450 F2$-"OAFEFEFCDCDCOZA-*A1 " 5550 P$-"FUSH RETURN KEY!" 6610 1:9 

4460 F3$-"OSFEFEFCDCDCO44A-441 " 5540 GOSUE 5590 6620 ‚ 0 

4470 PLAY Р%,Р%,Р% 5550 ' 6630 : 

4480 FLAY P1$,F2$,P3$ 5560 IF INPUT$(1)<>CHR$ (12) THEN 5560 6640 А 

4490 ' 5570 GOTO 920. 6650 , 

4500 FOR 1=1 TO 40 5589 * 6660 -10207,-52641,-511 
4510 PUT@A(M。Z) 一 (MM+ さ 1 。Z+15) ,F1X,FSET 5590 REM ===== WRITE LETTER ===== 6670 -511 

4520 PUTGA(W,2) -(W*31,Z2*15) ,Р2%,Р5ЕТ S600 ° 6680 -512 

4530 NEXT 5610 FOR R=O TO 2 STEP 2 6690 -512 

4540 ' 5620 SYMBOL (X*R, Y) ,P$,2,1,C 6700 

4550 FOR I-1 TO 5000:NEXT 5630 NEXT 6710 510 
4560 IF FRO THEN 2040 5640 RETURN 6720 o 

49570 ° $650 ° 6730 ,-29584 


あー っ と 控 破 り の ダブ プル ン ソノシート が 出 た ーー っ / グ これ で 他 誌 を K.O. だ ノ PiO も 創刊 1 周年 が 過ぎ て , ます ます 充実 し て きま し た ね . A 
な みり ょ うこ さん や 間 上 ら 6 ぼる ん な どの アイ ドル (?) も 生ま れ , 毎月 が 楽し み で す . これ か ら も 爆走 し て , ぶっ ちぎ っ て も らい だ いと 思い ま 
%; : 

(ORION- 7 ) 


pio 


リス ト 1 PIERO BASIC リ スト 


6740 27 ,-10208, 32757,-2 
6750 32755,-2 , 32737,-2 
6760 2035 ,-6176 , 127 ,-15872 
6770 127 ,-6656 , 511 ,-128 
6780 26 4-32 8191 ,-8 
5790 280 , 4080 
6800 
6810 : Ж ө, А р 
6820 ,-1024 3 ,-1024 
6830 ,-2048 448 
6840 。 504 2 508 
6850 i 127 
6860 б š к 
, 
, 


6910 27 ,-10176, 
6920 127 4-512 , 
6930 127 ,-512 , 
5940 127 ,-512 , 
5950 о O ? 
3 
3 
3 


7080 REM 
7090 REM 


7100 REM 


6960 1024 4 
970 O о O O 
6980 59 479152 49 ,729472 
6990 27 ュー10176。 1023 ,-64 
7000 Bl67 ,—-8 3 16325,—4 
7010 159735.,-12676, 127 37531232 
7020 2 4-12800,- 235 1256 
7030 225 1 2047 ;-52 
7040 

7050 

7060 

7070 
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リス ト 2 文字 プロ グラ ム BASIC リ スト 


> WIDTH 40,25 
20 Х-О :Y=100 :С=4 
XO LOCATE 0,24 :LINE INFUT F$ 
40 LOCATE 0,25 :PRINT SPACES (39) 
50 SYMBOL (X*2,Y) ,F$,2,1,C 
60 L-LEN(F$) *16 
70 LINE (X,Y) - (X*L , Y*2) ,FPRESET, , BF 
BO SYMBOL(X ,Ү),Р%,2,1,С 


zO 


2 GOTO 3 


6870 
6880 
5890 
6900 


- - E l. 
M NE ГУ E M > e n Y i|» NY 
PP» PSP PS 『 「 Г F [^ 


5 P Pf „ PNS Pr š PX. PSFS PS P` 
< ` c га у ioc NS ルト バ K SE ML_ à CAP АҮ, 
4%. \ N > Ы Zh N 5. 5 " ў [> 
[^ FD PND X AD 
Dex v): 2245421 ОУ k D 


ペー ン 


SEN АР 


М2-700- 
利 な R UM ルー チン の 紹介 ӨЗА 


MZ-700 の マニ ュ ア ル に は ,「 モ ニタ サ | +. この 方 法 は , シャ ー グ BASIC に まだ C | 標 が 0 の 場合 だ け こ ちら の 方 が 速い の で す 
プルー チン 」 と いう 項 に 主 な ROM ル ー チ | URSOR 命 令 が 付い て いな か っ た ころ に よ | が , 最高 757 ク ロッ ク も か か り ま す . 

ン の 使用 法 が 載っ て いま す が , 他 に も ゲー | 〈 使 われ た よう で す . XA Жп w тт кш, 
ム を 作る の に 便利 と 思わ れる サ プ ブルー チン | また, サブ ルー チン "?PNT17 t š | MZ-1200・80K/C で も 使用 可能 で す . 

が た くさ ん ある の で いく つか 紹介 し ます . っ た だく 同じ 動き を する 自作 サブルーチン を ł 7: Z-80CPU O 103É tfj iE mM 47 (DA A) を 
それ か ら , 1171 有 H 番 地 , 1172H 番 地 に そ | 紹介 し ます . これ は ROM の ルー チン より 5 | 用 いて 計算 し て お ぉ けり ば , PRTHL, 
れ ぞ れ *。 座標 の 値 が 入っ て いま す .PR | か な り 高 速 で , 処理 時 間 は 169 ク ロッ ク で | PRTHX を 利用 する こと に より , 簡単 に を 
NTS, PRNT, MSG 等 の サブ ルー チン 使用 | 4. ROM の ルー チン の 方 は , 157-25 » 7 | れ ぞ れ 0 一 9999, 0 一 99 の 10 進 数 を 表示 で き 
OW, カー ツル を 移動 きせ る の に 便利 で | ロッ ク (y ツ は 座標 で 0 一 24 で す ) で , уж | る の で , 簡単 な 得点 表示 な ど に 使え ます . 


N 自作 サフ プルー チ ン ア セン プル リス ト шина 便利 な サブルーチン 
` FAGE 1 アド レス | ラベ ル 名 | | レジ スタ の 保存 


E STNR ADRS OBJECT SOURCE STATEMENTS -— 
ATB HL レジ スタ に セッ ト し た V-RAM の アド | 全 レ ジス タ 
| レス に 表示 され て いる 文字 が 小文字 また | 保存 
5 | СХ, ҮЈЭУКАМ ADDRESS は 平仮名 の と き は , Z フ ラグ が セッ ト さ 


れ ま す . 


OOOO 

0000 F5 PUSH AF HL レジ スタ の 内 容 を 4 ケタ の 16 進 数 と AF 以外 は 
0001 CS қ F'USH EC みな し , カー ソル の 位置 か ら 4 文字 プリ 保存 
ооо? DS FUSH DE ント し ます . 


O ODS 0600 А 7) < 
“ws Бе gi 5 A レジ スタ の 内 容 を 2 ケタ の 16 進 数 と み | AF 以外 は 
ооов 22ро LD H, орон な し , カー ソル の 位置 か ら 2 文字 プリ ン | 保存 


0008 CE21 SLA C ト し ます 。. 


паре СӨР y ж L し レジ スタ に X 座 標 ,。 ヨレ ジス タ に Y 座 HL 以外 は 
| O00E 09. ADD HL, BC i I S ia аңы 
OOOF CE21 SLA p 応 す る V-RAM 上 の アド レス が HL レジ ス 


0011 CE10 KL l タ に セッ ト さ れ ま す . 


OI GEER EA 2 *DLY! | 107иѕес ディ レイ 
і О015 CE10 RL. $ А 
0017 09 ADD ・ 99usec ディ レイ AF 以外 は 
doct 保存 


Жыт OD YF CD S 64 rJ = 


о018 рі : 
0019 C1 zz 300usec ディ レイ 


|: OO1B C9 Е DLY12 | 7msec ディ レイ 


プリ ンタ に メッ セー ジ を 出力 し ます . х 全 レ ジス タ 
ッ セ ー ジ 先頭 アド レス は あら か じ め DE 保存 

レジ スタ に 指定 し て お きま す . エン ド マ 

ー ク は 0DH で す . コン トロ ー ル ・ コ ー ド 

は マニ ュ ア ル p.255 参 照 . 


ik; ラベ ル 名 は マニ ュ ア ル に 載っ て いる ソー ス ・ リ スト の も の で す . 
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m m m wm m m m wm m wm m = mw ш == "ч" E ғы NR яң иш NM NM NM NM E 
r LEE s MN How Nw HN m m и! 

: ги | E нии 
| а”, nu" a 
Wwe G v | N 


PiO ス クエ ア で は , PIO PiO の コ 
ー ナ ー で は 書き きれ な いよ うな 情報 
3 や 。 メッ セー ジ を お 待ち いた し ます . 
Ен 


өсі 

ナレ ー タ ー : 迷 える 魂 を 安息 の 地 へ と 導 
(®. 今日 は その 御 利 益 を 得 た 方 々 に , Z 
の と き の 様 子 を 語っ て い だ だ きま す 。 

少年 A : 私 は し が な い マ イコ ン 少 年 で す 
を の ころ 私 は 自分 の ゲー ム 案 に つい て ゆけ 
な い 頭 を か か え , 途方 に 暮れ て いま し た だ 。 
そん な と き , 友人 の 勧め で の を 読み だ び し て 
みた の で すず すず. 
例 の の 神 : 見 よー ぴの の カカ を / 

10 РВІМТ“7 4 7.4” — 10 PRINT “3 E456” 少年 人 お お っ ./ どん どん ブロ グラ 

T POS s“ Di Tu S.S £ 
XH MW» TA ・ 私 は жыланы と T, 
M PRINT “74 y x4" > 20 PRINT “RAA ыы) rie ас 
反転 文字 の を 読む だ どけ で , あっ と いう 間 に 上 達 . 私 

の 悩み は 解消 し まし た . 

の の 神 : テキ スト は ソノ シー ト 式 よ ⑦ 

ナレ ー タ ー : の を 信じ る 者 は 救 わ れる の 
TT. の は 人 類 の 宝 で す . 今日 も 1 日 , ti 
界 人 類 が の で あり ます よう に …. 

(Е: の と は PiO の こと を 指し ます ) 


人 @ 須 原 誠司 

僕 は PiO な どの ブロ グラ ム (特に カナ 文 
Ф) を 入力 する と き に 。 と て も 時 間 を と る 
の で す (英字 の 数 倍 ). 

ЕЛТСИН, 湊 の よう な こと を 考え ん で み 
го, それ は 。 カナ の 代わ り に カナ と 同 
じ キ ー に ある 英 ・ 数 字 に し , その 下 に 矢印 
を 付け , АЛКО о" な ど は 反転 文字 で 


表示 する の で す . 

どう て し ょ うか 。 も う カ ナ の 位置 が わか 
っ て いる 人 に は , か えっ て 邪魔 に な る か も 
し れ ま せん が 。 まだ カナ の 位置 が よく わか 
ら な い 人 に と っ て は , 入力 が 数 倍速 く な る 
の で は な いで し ょ うか . 皆さん の 意見 を 聞 
か で てく な さい 。 


@ りん で ん 


いて も だ っ て も いら れ な しい 毎月 8 日 , 本 
屋 に 行っ て ,。 1 ペー ジ 1 ページ を し ら み つ 
ぶし に 見 る 、。 そこ で は 笑う 人 も いれ ば 。 潤 
(Abv 5, 

こん な こと が , 今 本 屋 の PiO 売 り 場 の 前 
Жс от ЎТ. あな だ は , ここ て 笑う 
EE まお が で きだ で て し ょ うか 。 ӨШЛГСТ: ЖШ, 
も う 一 度 自分 の 葉書 が 以下 の 点 に つい て 大 


い 22. 
自分 で 「 こ れ は 載る /」 と いう 絶対 の 確 
信 が あっ た だ か:. 

⑳ に つい て は 問題 外 で し ょ う . @ は 編集 
部 の 方 々 の 一 番 言 いた いこ と の 一 つ で は な 
いで し ょ うか W は 絶対 必要 で す . この な 
う な 意志 が 葉書 に 表 わ れ て いれ ば , 編集 部 
の 方 々 も その 意志 を くみ 取っ て くれ る で し 


өні 

ミニ PiO が 話題 に な りか け て いま す が , 
新 ヨ コー ナー を 考え まし だ.、 症 し て 'PIOX 
1K ラ イブ ラリ 」 と いう も の で す 。 内 容 は , 
1K バ イト ぐ で らい の マシ ン 語 の ブロ グラ ム を , 


丈夫 で ある か 考え ん えて みえ ましょ 2 う . E33 メモ リ ・ マ ッ プ と フロ ー チ ャ ー ト を 付け て 
の 葉書 が 読め る か …. それ で は , あな だ が 笑う 〇 月 8 日 を 期待 送っ て も らい , それ を 掲載 する と いう も の 
の 自分 が 言い た いこ と が は っ きり 書か れ て MEM ж ++. 利点 上 し て は 。 

短い の で 解読 し や すい . メモ リ ・ マ ッ プ 
付き フロ ー チ ャ ー ト を 付属 きせ る こと ぐ 省 
メモ リ 化 で き , 解読 不能 な プ ブログ ラム は 送 
ら 和 で こ な い ( と たと 司 う )。 
昔ながら の マイ コン ・ マ ニア は , メモ リ 
の 少な か っ た 時代 を 懐 し むこ と が で きる ( ど 
こ が 利 点 じ ゃ ). 

と に か くく ゲー ム ・ ブ ログ ラム だ け に と ど 
ま ら ず , あら ゆる 方 面 の プロ グラ ム を 掲載 
すれ ば いい と 思い ます . 1 多 バ イト で 何 が 
で きる の か ?2 と 思う 人 は , 84410850 
BOMB WORLD を 見 て くだ る さい . 1К>54 
К БАСТУ や れ ば で きる 
АСУ MUI уар 
ー ジ と し て ,。 1 プログ ラム あたり 2 ページ 
Ea. b: $ at A. 下っ て みだら どう で じじ ま 


> 


2? 


OG Stranger 
最近 マイ コン ・ シ ョ ッ プ に 行っ て 気付 く 
こと で す が ,。 そう いう 所 に 行く 人 の 性 格 ・ 
特徴 し いう も の が , は つっ きり し て いる よう 
な 気 が し ます . 89 大 学生 ・ 社 会 人 の 場合 . 1 人 で や っ て 
Е И Н Н ЪЪ не М 2. これ も メガ ネ を 掛け て お り , 新 製品 の 
その 人 性格 ・ 特 徴 と いう の は , デモ を じっと 眺め て いる . な に や ら メ モ を 
で 小学 生 の 場合 。 集団 で , か つ ゲ ー ム が 目 し だ りす る (社会 人 ). 
的 で や っ て くる . 以上 で す . 全部 が を そう と いう わけ で は な 
の 中 ・ 高 校生 の 場合 (これ が 一 番 多 い ). BR だ > を 天罰 表札 才 いた いう こと で し 
装 が セン ス な し と いっ た 感じ おどおど し 72. 
だ 性 格 。 マ ザ ュ ン で ある か 。 まだ は 半端 者 


の 不良 で ゲー ム 目 的 . スガ が ネオ を 掛け て いる 
BEE? 大 部 分 の 人 が どれ か に 当て は ま 
ЭЛЕ» ©... 


@ 相 沢 ひ ろ み つ 
id. 本 体 は 画面 |O|-|F| まで の キー 
と スロ ッ ト で , スイ ッ チ ON で モニ タ が 作動 . 
BASIC な ど は ROM カ ー ト リッ ジ (別売 ) を 
付け , 専用 キー ボー ド (ROM カ ー ト リッ ジ 
рі, 新参 者 の 「 ぐ わっ し ゃ 」 と いう 者 で す . 3 月 号 の p.140 の Mr. さ ん , 実に する どい 指 適 を し て いま すね . 私 も つい 最近 まで A タ イプ で し 
| RIO K. と ころ が 。 つい に B タ イプ へ の 挑戦 も 初め る こと に し た の で す . し か し 遊ん で いた ば か り い た 私 に は BASIC の 壁 は 厚い 。 せめ て ミニ ピオ 


Pi 
Ie ぐら い の も の は 作り た い . さき あみ ん な / 目 ざめ る ん だ / 作ろ う ゲ ー ム , な ろう 常連 , Hi 5 Р1О/ 


付属 の ) か ら プ ログ ラム を 入力 する . 
まだ , メ モリ 保護 機能 は 付け た 方 が いい . 

スロ ッ ト が ある と ょ 拡張 な ど に は 便利 だ し , 

プロ グラ テム 人 欠 ロ ー ド し な で て る すむ 、 


そし て , ROM カ ー ト リッ ジ に は 他 の 高級 
言語 の も の も あり , さ きら に 年 数 が 進む と IN 
S 通 信 に 使え たり, カラー 画面 の も の が 出 て 
きだ り 。CAI が ども る 使え だ りす る 。 


(も う ゲ ー ム は 買わ な い ぞ と 誓っ た が いつ まで も つか わか ら な い . ぐ わ っ し ゃ ) 


Xi 


シリ ー ズ 


CZ- ас 


-” 


園原 作 : 芸 夢 狂人 移植 : Adm 


も うす で に ご 存 知 の 方 も 多い と 
過去 の I/O 誌 に 数 多く の ゲー ム を 発 


$35, 


思わ れ ま 


表し た あの 芸 夢 狂人 氏 の “SPACE 


MOUSE" が , 


遂に X1 で 走り ます . あの 


マウ ス の 動き の か わい さ (=, 今日 か ら あ な 


た も マウ ス 感 覚 (!? ) 
プロ グラ ム ・ イ ン フ ォ オメ 


マシ ン 語 B000—BFFE 
B000 


スズ スター トド 


わり と 少な い メ モリ の 


いま だ 


| て すね . 


ーション 


МЕ; 


よ 

BGM は も う 
すこ し し っ か り と し た も の が ほし い 
(O) 


オォ オー ル ・ マ シン 語 な の で , Hu-BASIC 
を 立ち あげ て か ら モ ニタ の M ユ マン ド で , 
B0 0 0 是 か ら 6 書き込ん で 《 く ださい. 
pe ッ ク サ ム を 確認 し て か ら , S コ マン 


FT 


* SBOOO BFFE BOOO :SPACE MOUSE 


CUTEST U Cuy ONS, 


ロー ド 後 に @BOOO と する と スタ ー ト し ま 
+. モニ タ を 切り 離し た も の を 持っ て いる 
方 は , それ を 使う と 便利 だ と 思 


g し 


以後 は 


いま すそ を 


の 気 が あ っ た ら ご 自分 で IPL 起 動 版 を 作っ 


+5 +é +7 +8 


$3 
` ee 
84 
3E 
ee 
вв 
eB 
88 


ce 
81 
73 
01 
21 
со 
ee 
Be 
ED 
ce 
22 


Ағ 

AA 
ED 
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26 
9B 
36 
FE 
с? 
CO 
9E 


3F 
10 
59 
26 
ae 
ee 
ei 
2e 
ЗЕ 
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ee 


で みて くだ 


+9 +A +B 


e? 
71 
e3 
ee 
36 
11 

CD 
св 
Е6 
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31 


CD 
ED 
94 
21 
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"e 
74 
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CD 
FE 
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49 
AF 
e4 
13 
вв 
в@ 
1С 
FE 


eU. 


MEO JI 

上 か ら 降 り て くる マウ ス を 避け な が ら , 
250 Z L ED CA 29M. А7, 75 я 
どき マウ ス の 栄養 源 と な る <* パ ワー エサ が 降 
り て きま す . 人 間 も こ れ を 食べ る と 歩く 速 
る が 倍 に な り , 床 を 突き 破っ て 上 に 進む こ 
と が で きま す . そし て パパ ワー アッ プ 期 間 中 
は BGM が 変わ り ま す . だ た だ し パパ ワー アッ 
プ 中 で も マウ ス に 食わ れる と 死に ます . 

こう し て 屋上 に 出る と 宇宙 船 が 救助 し て 
くれ ます . この 時 点 で 残っ て いる 酸素 量 が 
ボー ナス 点 と し て 加算 きれ ます . 酸素 量 は 
左側 に 棒グラフ と し て 表示 る れ , これ が 0 
に な る と 人 間 は 死亡 し ます . 

得点 で す が , 第 1 面 は 1 階 上 が る と 10 点 。 
パワ ー エ サ が 50 点 で す . 以降 1 階 上 昇 が 10 
点 ず つ , ママ ワー エサ が 50 点 ずつ 増え て , 5, 
000 点 を 越え を る と 人 間 が 1 人 増え ます . 

キー 操作 は [4| と [6| で 左右 へ , [8] で 上 
へ 移動 し ほす. また だ ジョ イス ティ ッ ク も 使 
427, キー ジョ イヌ スチ ティック では 幸二 
を 優先 し ます . それ と 人 間 の 数 を 変え られ 
る の で , その アド レス を 言い ます 。 

B210H 初期 値 06H( 但 し 6 人 以上 は 表 
示し な い ) 
を 適当 に 変え て みて くだ る い 。 


M ARAKCHHEE I SENS 
だ 結果 , 音 が 手抜き に な っ て し まい まし だ た だ. 
LPL, ゲー ム と し て の 出来 は まあ まあ だ 
と 思い ます . i 


OBEA 

1) Ж #ҤА: “スペース ・ マ ウス /。 
I/O, "81 年 10 月 号 

2) FALCON; S4. TARSA SODA 
マイ コン ・ ゲ ー ム の 本 |2], 工学 社 


3) "パソ コン テン レビ XX 1 ЕМ2-7000Н. 
ЗА”, マイ コン , "83 年 2 月 号 

4) “Hu-BASIC 内 部 解析 1 ・ 2^, 

Oh. MZ, 84 年 9 月 号 , 10 月 号 
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pio 


スペ ー ス ・ マ ウス マシ ン 語 リス ト 


を どう も 初め まし て tic-tac で す . Nakkey さ ん 御 兄 妹 が X1trubo の ユー ザー に な られ だ た そうですね. 私 は JR-100 と X1 の ユー ザー な の で , お 


——- sa. sa arwa €T an 
E * 
KD 297 互い に 頑張 り ま し ょ う . あっ そう そう 、 他人 事 に 日 を は る む よ う で すみ ませ ん が 、X1turbo を Xlturbo で は な く X1 と し て 使っ て くだ さい ね . 


そう する と うち の X1 も UTOT. PS2 皆さん PC-1404( ポ ボケ コン ) っ て 知っ て ます か ヵ ? 
( 間 上 ら ぼ さん , Nakkey さ ん ファ ン の tic-tac) 


PiO 


スペ ー ス ・ マ ウス マシ ン 語 リス ト 


VWAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVATVAVATAVAVAVATAVAVAVAVAVAVAVAVAVATATVAVAVAVATVAVAVAVAVAVAVAVAVATAVAVAVAMAVATVAVAVAVAVATVATVATAVAVATATATAVAANA 
9000000900000000000000000000 
5,4,9, 5555 


% Ф 


JOY JOY РАСК е 


シャ ー プ (株 ) で は , 先 に 発売 し た JOY 
JOY РАСК に 続く 第 2 弾 「JOY JOY 
PACK 2 」 を 発売 し ます . 

まだ, 同社 で は 現在 MZ-1500QD ワ ー 
ロモ セ モール 「Try ノ /QD ワ ー プ ロ 」 と し て , 
量販 店 ・ 事 務 機 文具 ルー ト を 中 心 に , 4H 
15 日 まで Try/QD コ ー ナ ー を 実施 中 で す . 


A 人 A A 人 A 人 人 A 


tie a! 
LE B; 


259455 8 Bo? con 2 


а, ДУУ w^‏ فر از * أ ف 


A 


24 Wos 


۹ 


900 
9000000000000000000000090000 
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デー タラ イフ 」 愛 用 者 ブ プレゼント 


化成 バー ベイ タム (株 ) は 同社 の 「 デ ー 
信 ラ イフ 」 フ ロッ ピー ディ スク 愛 願 感謝 
LC, 下記 の 要領 に て デレ ゼン ト セ ー ル を 
実施 し ます . 

《 期 間 〉 

昭和 60 年 3 月 20H 一 5 月 10 日 まで 

《 プ レ ゼ ント 品 》 
Ф 「 デ ー タ ライ フ 」5-1/4 イ ンチ 10 枚 (1 箱 ) 
購入 に 際 し 。 オリ ジ ナ ルフ ァイル (10 枚 収 
納 用 ) 1 個 
0'7—^*24271,5-1/44-7730H t 
ACEL, オリ ジ ナ ルケ ー ス (30 枚 収納 用 ) 
1 個 
O 「 デ ー タ ライ フ 」 8 インチ 10 枚 ( 1 Ж) 
購入 に 際 し , あと か ら ケ ー ス を ジョ イン ト 
で きる ユニ ッ ト 式 ケー ス (2 枚 収納 ) 1 個 
ヤマ オリジナ ルフ ァイル 


ж 5 -1/4 イ ンチ 30 枚 購入 者 は , オリ ジ ナ ル 
ファ イル 3 個 と ケー ス 1 個 が も ら え る ダブ 
ルプ ブレ ゼン ト 

(тат) 化成 バー ベイ タム (株 ) 
49104 東京 都 中 央 区 銀座 5-13-12 

会 (03) 542-6334 


ヤマ オリジ ナル ケー ス 


paie 


СЕ Š 

MZ-BOB 

BASIC 二 マシ ン 語 , Та. е 
NOUS 


ОБО 


шкен 


お び た だ し い 有 毒ガス . そこ に うごめく 奇 
怪 な 生物 . 実験 室 で の 事故 は 考え も し な い 
世界 を 生み 出し , ク テリ アム を 生み 出し た . 
早く や つ を 破壊 し な けれ ば , 次 々 と 汚染 が 
広まっ て いく . し か し ,。 恐る べき バー ミン 
達 が 行く 手 を 困難 な も の と する . 

EWEG, 実験 室内 に 残さ れ た イミ >, 
イレ ン を 反応 させ て , 活性 物質 イミ レン を 
合成 し て 各 ル ー ム の 敵 を 倒さ ね ば な ら な い . 
そう し て いる うち に も , キラ ー ド が 。 ネー 
ベム が , そし て ザッ クリ が , すでに 書 の 後 
СФ. 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


| BASIC 
| マシ ン 語 8A00~9EFF 


| 登場 キャ ラク タ は よく 考え られ て い 
ます が , キー 操作 の 反応 に いま ひと 
| つ な 点 が 感じ られ る ね . (О) 


て ママ ママ ママ ママ ママ ママ ママ ママ ス 


ゲー ム 万 法 刀 説明 
SSSSSSSSSSSSSSSSS 
主人 公 の シー カー を , テン ・ キ ー の [sl[2| 


[4]| 6] に て 各 方 向 に 動か し , 4 匹 の ネー ベ 
ム と ク テ リ アム を 倒し , 画面 右 下 に 出 て く 
る ハー ト を 取る こと に より ,。 汚染 を 阻止 す 
る の が 目的 で す . 

シー カー の 動き 等 に つい て は 図 1 を 見 て 
《 だ きい. ここ で [5| と [SPAcE| と は 同じ 働 
き を し ます . また , [e][2]|4]|6] [5] or 
[SPACE| の 組み 合わ せ で ボッ クス を 壊し た 
b, マジ カル ボッ クス の 移動 が で き 。 さら 
(= [5] or [SPACE] の み で 向い て いる 方 向 に 
イミ レン を 発射 で きま す が , 1 発 ず つ し か 

や っ と 脱出 ルー ム が 見 え だ し た ぞ 


ポイ る ка "Rm? 


今度 は 没 に な らん だ ろう と 思っ て いま す が , どう で し ょ うか ? 


発射 で きま せん . 

な お な, 各 ボ ポッ クス に は イミ ン 。 イレ ン , 
バー ミン 。 マジ カル ワー ボッ クス が 入っ 
て いま す 。 

次 に 各 キ ャ ラク タ 等 に つい て 説明 し ます . 
イレ ン , イミ ン 

これ ら を 取る と 右側 表示 部 の 値 が 5 ЗЕРИ 
x, 画面 中 央 の 反応 炉 を 通過 する こと で , 
зк ERRES ЯЛ. の に し が ("まう 
に em 
J 

5 ved BR, С. 
3 発 命中 る せる と 倒せ ます (M2) 

@ キ ラー ドー トゲ ボー グ 

この 敵 は むやみ に 殺 る な いこ と. それは, 
ある 一 定時 間 だ つと 復活 し て くる か ら で す . 
まだ た その 時 点 で イミ レン が 2 発 減り ます . 
② ネ ー ベ ムー ビッ グ ア イ 

この 敵 を 殺し て いく L, 画面 右 下 に 脱出 
ルー ム が 少し ずつ 表示 る され, 最後 の ネー で 
ム を 倒す と 脱出 ルー ム に ハー ト が 出現 し ま 


2 キャ タラ クダ 


ビッ グ ア イ 
(ボッ クス に 
4 匹 い る ぞ ) 


トゲ ボー グ 


(ゲー ム 時 初め 
ғай) 


T+. 3 2110) E KU T. 
@2> U 7 —— š JL A—3'.y 71) 

この ゲー ム の 悪 の 主人 公 と も いえ る 敵 で , 
こい つ を 殺さ る な い 限 り 一 切 脱 出 不 可 . ま だ, 
こち ら の 行動 を 先読み する な ど ,。 IARI 
英 だ が 抜け た 所 も ある . 
マジ カル ・ パ ワー ボッ クス 

これ は 破壊 不可 能 な ボッ クス で , 次 の 5 
つの メ パワー を 秘め て いま す . な お , 移動 し 
だ い 方 向 に 別 の ボッ クス が あっ た り , 画面 
か ら は み 出 る 方 向 に は 動き ませ ん . ils 
ワー を 得る に は , 中 央 の 反応 炉 の 中 へ 移動 
ае 
Фух- 22.79 

тоет олот 
マジ カル ・ ボ ー ナ ス 

0 -9999 ま で の ボー ナス を ルー レッ ト 方 


図 3 ゲー ム ・ ス テー ジ 


で 
これ が ボッ クス だ / 
中 に は 何 が 入っ て いる の だ ろう 


が 反応 炉 。 イミ ン , イレ ン を { 
e ا‎ oll 


Hi-SCORE 
50000 
SCORE 
850 
ROUND 
1 
イミ ン イ レン イミ レン FE ` 
10 15 9 | 1 524%, 
MAN- 3 Ж レン の 表示 付 


221: da i 
に 気 を 付け よ / ノ 


ES E. 脱出 ルー ム снна 


バー ミン 達 を 倒し すばやく 逃げ こめ / ノ 


相変わらず 汚 な い 字 だ な . 話 を 元 に 戻す . Nakkey $ A &Tomoko & AO 
プロ グラ ム す ご いで すね (3 月 号 の 話 で す ). 思わ ず 笑 っ て し まい まし た が 。 あ れ で ERROR に な ら な いん で し ょ うか ? (ちょ っ と リス ト を 見 た 
だ け な ん で す ) し か し 迎 夢 快 人 氏 は アイ デア も 違い ます ね . 自分 で RSET ル ー チ ン ( 現 実に は 違う の で し ょ う が ) を 考え る と は …. 
рег Mephist き ん に は か な いま せん ね . あの 人 は 違う も ん ね . 3 音 独立 演奏 ルー チン , 


し か и, Su: 


PSG の 限界 に 挑戦 で すね . 尊敬 で す . 話 が 走り 幅 飛 び 


式 で 表示 (hit any key). 
イミ レン アッ プ 
イミ レン を 10 発 追加 す る . 
⑳ バ ー ミ ンス トッ プ 
バー ミン を 数 十 秒間 スト ッ プ さき せる. Ж 
ックス を 取る チャ ンス だ 
⑳ ス ー バ パー パワー イミ レン _ 
イミ ン レン 2 発 分 の 消費 に より 敵 を 一 撃 で 
倒せ る も の で , 面 ク リア を 早め る 効果 的 な 
ボッ クス だ ググ 
31 アド レス ・ マ ッ プ 


PI 


dii 


敵 に や られ た か 

画面 転送 

ABS, SGN, RND 処 理 

X, Y 座 標 つ G-RAM ア ドレ ス 
X, Y 座 標 つ V-RAM ア ドレ ス 
キャ ラク タ ・ プ リン ト 
移動 方 向 ル ー チ ン 

キー 入力 処理 

シー カー の 処理 

シー カー プリ ント , G プ リン ト 
シー カー 方 向 処理 


メイ ン 2 ( 敵 処理 含む ) 
ボッ クス 処理 


1 LIMIT$87FF:LOAD: POKE$5169, 128: CONSOLE 
C40,N: GRAPHI1,C,O1:PRINTCHR$(6): TEMPO 7 
2 DIMUP(28),UX(25) ,UY(25) , BU$( 3S) , CL$CS) 
s МОФ (50) „НАФ (2), ЕХ (4) 。EY(4) , BICA) 
КЕМООООООООООООООООООООООООООООООООО 
КЕМО | š [ 
REMD POISONOUS...Z (MZ-BOB) 
REMa i e. е 88-5520 
REMO 1984 5/5 Э 11/23 
REMO Made By 
REMO Е M گا ھا‎ H, MIZUNO 
10 КЕМОоООООООООООООООООООООООООООООООО 
11 Di$-"H. . .. .. .. .. . 
B":D2$- "Eno " 
12 GOSUB?90O: 6050891: НІ =50000: RESTORE 16 
13 GOSUB95:HA$(1)z"/N095e0$4":HA$(2) =" \ /0 
aak": CL $-STRINGS$I(CHR$G0),8) : GOSUB?4: GOS 
UB1000: GOSUB1050: GOSUB1080: GOSUB1100 
14 FOR IO TO S:EX((I*1)2PEEK(39904*I*2) 
:ЕҮ(1+1) =PEEK( さ 9905+TK2) : МЕХТ I 
15 FOR 1=1 TO 47:READ ААФ: МОФ (І) =AA$ : МЕ 
XT I 
16 DATACO.D,C,D,C.;D,C, D; С, р, С, D; C D; C, D 
SF»GF;G,;F,G,F,G,F,G;F,G,F,G,F, G, В, 45, #6 
;,8F,8D, NC, C, C, C, SC, C, 8C, C, +#С, +#C 
19 REM----3»" メリ ー サ クセ イ 
20 FOR IzO TO 31: GOUSUB97INEXT I 
21 FOR І=0 TO 28: 6050898: NEXT I 
23 FOR Ізі TO 218STEP4: CURSORO; I: PRINTD1 
$:NEXT I 
24 FOR Ісі TO 25:UP( I) -PEEK(DP*I-1) 
25 IF UP(I)«»0 THEN GOSUB96: РОКЕМР+2, UP 
(I) : MFP=MP+ さ 5 GOTO27 
26 POKEMP;.UX(I):POKEMP*1,UY(CI): POKEMP+2 
;UPCI)8 МР=МР+5 
27 NEXT I:MPz35072: DP=DF+251 IF DP»40545 
THEN DP-239936 ` 
28 CURSORS2,21:PRINT "N; : CURSORS 
9,22: РКІМТ "B0" ; : CURSORSO, 24: PRINT "WSB 


j *USR( $BFDO) t PRINTCHR$ ( é) : CURSORO, О 

50 REM TITL E------ 

51 CURSUR さ 2。 О: PRINT" 22222222": CURSOR さ 2。 
1: РКІМТ"РОІЗО" : CURSDR さ 2。24 PRINT" NOUS. .Z 
": CURSOR32, 31 PR INT "= ニニ ニニ ニニ = 

52 CURSORS2,5:PRINT"Hi -score" : CURSOR34, 
9: PRINT"SCORE": CURSOR さ 4 』 15: PRINT "ROUND" 

55 РОЅІТІОМ№260, 119: РАТТЕКМ-В, M3$*CL $«M4 
$1 CURSOR32, 18: PRINT" MANz" 

54 LINE262,152, 319,152, 319,167, 262,167, 
262,152: CURSOR37 , 18: PRINTMNI CURSOR37, 14: 
PRINTRU š 

5% FOR I=O TO 2:POSITION270+I118,156:PA 
TTERN-8, "<B++++B<":NEXT I 

89 CURSORSS,7:PRINTHI:GOSUB1010: TI$»"00 
0000" : GOTOSOO 

90 P=15:Q=9:VC=0: BU=OI CX« 51 CYu 31 C92-11M 
U=i: VP= さ 6507 ! PL=0: МР= 355072: YLs01 YM=0: РОК 
E$8BOC, Ot POKE$8BOD, 1: POKE$BBOE 1: POKESBB 


て すね は ょ ん と 、 すい ませ ん で し た .。 で は この へ ん で . 


1) : PDUKEMP+ 1 。UY( I) * RETURN 


シー カー 

# 入 いま す . 1 捧 に つき る 2 回 まで の タダ 
ッシュ が 許さ きれ て お り , 原則 と し て 人 数 は 
増え ませ ん . 4 

PLqvcvIMDU, С А 
ぃ いずれ か 一 方 が 1 以下 の と き , 1 度 で も 敵 
と クラ ッシュ する と ゲー ム ・ オ ー バ ー と な 
り ま す . 


得点 


Фі fI L5-250—1,500:84 X F 
@ イ レン , イミ ン 獲 得 時 …100 ポ イン ト 
Mu Tte TREES 
数 X50 ボ ポイ ント ' 
SSSSSSSSSSSSSSSSS 


OO 


SSSSSSSSSSSSSSSSS 
マシ ン 語 で は , 敵 の 動き , シー カー の 動 


表 2 デー タ お よび ワー ク ・ エ リア 


16,0: С5=0: RESTORE 1520: GOSUB 1 500: RETURN 
91 HA=1:SC=0: RU= і: RB= 1 : DP=S99361 Ү9ж104В 
I(0) =6: ВІ(1) =10:ВІ (2) 217: BICS) 221: BI(4) = 
27: BS=O 3 MN 3: RETURN 

94 FOR 1=59872 TO 39898: POKEI-3392,PEEK 
(1) :МЕХТ І: RETURN i 

95 POKE$88B00,P: POKE$8801 , 0: РОКЕФВВОВ, Y? 
s RETURN 

96 CURSORUX C I) ;UYCI) : PRINTD2$: POSITIONU 
X( 1 ) K8, UY CI) #8: PATTERN-16, ОМ: POKEMP , UX ( 


97 CURSORI;O:PRINTCHR$ (30) t РОЅІТІОМІ 8, 
О: РАТТЕКМ-В, WA$: CURSORI , 25: PRINTCHRS$ (30) 
:POSITIONIK8,184:PATTERN-8, WA$: RETURN 

98 CURSORO, I: PRINTCHR$ (30) :POSITIONO, I$ 
8: РАТТЕКМ-8, WA$: CURSORS31 , Ts PRINTCHR$ (30) 
: POSITION248, I $8: PATTERN-B, WA$: RETURN 

TT PEM o ESA о eedem 

100 IF PEEK($8801)4»11 THEN RETURN 

101 IF (YL=O) *(YM=O) THEN RETURN 

102 IF (YL«4»O)*(YMX4»0) THEN MUSIC"+BOFE 
DC " 

103 IF YM»YL THEN YM-zYM-YL:POKE$88O0B, РЕ 
EK ( $BBOB) *YL : ҮІ =0: RETURN 

104 IF YM<YL THEN YL-YL-YM: POKE$880B, PE 
EK ( $8805) +ҮМ: YMzO: RETURN 

105 POKE$880B,PEEK($880B) *YL : YLzO: ҮМ=0: 
RETURN 


510 USR ($9A30) sUSR( $9400) 
511 IF РЕЕК‹ 45056+РЕЕК ( $BBOO) *PEEK ( $BBO 
1)*40)=1 さ 4 THEN 850 С 

515 СОКБОК15, 11: РКІМТНАФ (НА) : НА=НА+1 : IF 
HA=3 THEN НА=1 

516 60508700: GBOSUB600 

517 MUSIC MUS (MU) : MU-MU*1:IF MU> 47 THEN 
MU-1 

518 IF (FEEK( ま BBOO ) =15) THEN GOSUB100 
520 POKE$8811,0:USR($8FOO): IF PEEK($880 
А) =1 THEN 60808560 : 

521 IF PEEK(45056+PEEK( $8800) +РЕЕК ( $BBO 
1)*40)2135 THEN 60508540 

522 IF C9«0 THEN 524 š 

523 C9=C9-1: IFC9=OTHEN POSITION264, 176: 
PATTERN-16, CL$+CL$+CL$+CL $: POKE45969, 52 
524 IF РЕЕК(%8810)<>0 THEN POKE$8810,0 
526 IF VAL(CMIDS(TIS,5,2)) -59-(ВІ(В5)) #2 
THEN Т1%-"ОООООО": 60508552: GOSUBSOO 

527 C6-45-C5*BI(GBS): IF C640 THEN Có71 
528 FOR I=O TO C6:NEXT I 

529 РОКЕ%ВВОР,О 

きり REN SOUNE ーー マ ーー ニー ニー テー 
CURSDR さ さ 。 11: PRINTSC: CURSDR さ 2 。 16: PRI 


CURSDR さ 1 , 16: PRINTYM: CURSDR さ 4 。 161PRI 
NTYL: CURSORS7, 161: PRINTPEEK( $880B) : GOTOS1 
O j 
540 GOSUBB849: MN=MN+2: CURSOR:37 , 18: PRINTM 
Ns SC=SC+1 0000: CURSORS3; 22: PRINT "10000" 1 M 
USIC"Ci1DEDDEFEGGGGFECO" : РОКЕ45969, 52: RET 


き を 中 心 に 行なっ て いま す ( 家 1). キャ ラ 
ZAOKY ROT pit か 
な り 工 夫 し て あり ます . 

また BASIC 部 で は, ボッ クス 処理 を 中 Ù 
に デー タ の や り と りな ど を 行なっ て いま ず 。 
そして, A-PEEK(X) : А=А +1: POK 
E X, AZ POKE X, PEEK(X) 十 1 と し 
て スピ ビード ・ ア ッ グ を 図っ て いま す . | 
4446 4 4 € € € € € €& € € € 


最後 に 


بک و و کو و و و و پک یک ب یک بک ب پە 


` £ DP SE OMAR 2 
隠れ キャ ラク タ が あり ます . ぜひ 出現 きせ 
て で だ きい 。 また 。 Юе И С 
移植 し て いま す . 


し ただ. ぜひ 頑張 っ て くだ る さる いね. で は この 
A. | 
3 参考 文献 
1) PiO パ ー ツ , PiO 各 号 
2) “MZ-80B 活 用 研究 "。 工学 社 
3) MAKOT : “СОРЕ / ", I/O, 
'834F10 H 号 


URN 
em YG-PEEK ( $880B) : YQ=YQ-2: IF YQ<O THEN 


РОКЕ%ВВОВ, YQ: RETURN 
С5-С5%2: RETURN 
ес PILIJ ーーーーー 
ЫМ=В-РЕЕК ($8811): WWe35480-WME9 
IF PEEK(WW*7)z1 THEN 566 
вото 585 
РОКЕФВВОА, 0: POSITION270*PL318, 156: P 
ATTERN-8, "< ET ~< " : MUSIC" -KCO*C*DSCO" 
568 PL-PL*1:IF FL>= さ THEN 571 
559 60808595 
570 POKE$8800, 15: POKE$8801 , 11: GOSUBSBO: 
CURSOR1Z, 10: PRINT"READY ! "t MUSIC"R9RO" : CU 
RSOR13,10:PRINT" ": RETURN 
571 MUSIC"-«*4AOBSCSDOEC": MNzMN- 1: CURSORS 
7,18: PRINTMN 
575 IF MN-O THEN 900 
576 FOR 1-2ТООБТЕР-1:РО8ІТІОМ206-1%18,1 
56: PATTERN-8, "XBét-F* Bé": NEXT. ТІРІ -О: 6080 
B599: GOTOS570 
580 IF DM>= さ 15 THEN DM= さ 15 
585 IF om жы 
THEN %ОО 
590 РОКЕФВВОА, О: RETURN 
595 FOR Ізі TO150: X=INT(RND( 1 ) 16) t YIN 
T(RND( 1) ж16) 
596 RESETPEEK ( %8800) * 日 +X 。 PEEK ($8801) *8* 
Ү:МЕХТ I 
597 FOSITION PEEK($8800) X8, PEEK ($8801) * 
8: PATTERN-16, CL$+CL $+CL $-CL $: RETURN 
599 FOR 1=1 TO 23:РО5ІТІОМРЕЕК( $8800) #8, 
PEEK ( $8801) XB: PATTERN-16;. CL$ (1)  MUSIC"—F 
О": МЕХТ I:GOTO 597 
600 REM--- VIRMIN -- 
601 IF FEEK( ま BBOF ) =0 THEN RETURN 
602 FO=INT (ІМТ (PEEK ($880F) ~ 129) /9) : AD= さ 
6480«FOX9:FFzPEEK(AD*3): IF FF>64 THEN FF 
zFF-128 
603 IF (FF=1)+(FF=2) THEN 605 
604 FFzLOG(FF) /LOG(2) +2 
605 IF PEEK(AD*72«»1 THEN RETURN 
60% IF (PEEK (AD+7) 20) + (PEEK(CAD*7) =2) TH 
EN GOSUBSSO: RETURN 
610 POKE$880F,O: IF FEEK( ま BB16)=1 THEN 6 
50 


613 ON FF GOTO 615,617,619, 621,623, 625 | 


:627 

615 GOSUB640: SC=SC+400』 CURSORSO, 25: PRIN 
T"33" POSITION240, 1841 PATTERN-8, CL$+CL $: 
GOSUB6 43: GOSUBB848: 5070652 

617 GOSUB646:PÜKEAD*3, $20! BC«8C*250: BOT 
0630 

619 GOSUB&46: PDKEAD+ さ 。 $011: BC=SC+ さ OO* CUR 
SOR31; 22: PRINT"3":POSITION248, 176: PATTER 
N-8, CL$: 5070630 

21 GOSUB646:POKEAD+3, %10: SC=SC+200: GOT 
0630 

623 GOSUB640: SC=SC+ さ OO GOTO 632 


(気分 は も う &ЖФВА5Е を 買っ て うれ し い 間 上 ら ぼ な みな みり ょ うこ ファ ン の P.S. を 1 度 も 使っ た こ と の な い G@Oboy Satoshi で し た) 


< 
D 


いつ に な る か 不明 で すか が 
完成 の と き に は また 発表 し だ た いと 思い ます . 
gis, 私 の 最高 点 は 22 面 で 415,140 AT 


pio 


リス ト 1 POISONOUS Z BASIC リ スト 


625 GOSUB4401! SC-SC« 350: VC=VC+1 : GOSBUB680 
: GOTO 632 

627 GOSUB646:POKEAD+3, $04: SC=SC+3501 CUR 
SUR さ 1 。 21:PRINT"+":POSITION248, 1 6 日 : PATTER 
М-В.Сі.%: 65070620 

629 RETURN ; 

630 РОКЕАр+7, 2: РОКЕФВВОР, 1: РОКЕФВВОЕ, 1: 
MUSIC"-«*C4CO": RETURN : 

632 FOR Ісі ТО Z:POSITIONPEEK(AD) #8, PEE 
K(AD*1) #8: PATTERN-16, CL$ (1) 1 MUSIC"—&DO" t 
NEXT I 

655 POSITIONPEEK CAD) XB, PEEK(AD*1) #6: РАТ 
TERN-16,CL$*CL $*CL $+CL $ 

655 РОКЕАР, O: POKEAD-*1, O: RETURN 

640 РОКЕАр+7, 0: RETURN 

642 POKE46006, 0: POKE46007 , 0! POKE45957,0 
s RETURN 

643 РОКЕ45927, 0: RETURN 

644 CURSOR さ 1 。 21: PRINT" う も ゃ う も ゃ ゃ うう "5 POSITI 
0ON248,168: PATTERN-24, CL$«*CL $*CL$: POSITIO 
N240, 184: PATTERN-8, CL $: RETURN 

646 POKEAD+8, 30-BI (ВБ) t RETURN 

647 IF PEEK($ コ BOB) 一 1 く =O THEN POKE$880B, 
1 

648 РОКЕФВВОВ, PEEK ( $880B) ~ 1: RETURN 

650 ON FF GOTO 654, 652, 654, 651, 631, 632, 
654 

651 SC-8C*800: GOSUB6401: 5051/В647: BDTD6 さ 2 

652 SC-SC-*1000: GOSUB6401: VC じ =VC+ 1 : GOSUB64 
7: GOSUR6BO: GOTO632 
. 654 SC58C-*1500: GOSUB640: GOSUB644: GOSUBG 
45: GOSUB647: GOTO^32 

680 ОМ VC GOTO 681,682, 683, 684 

681 РОЗІТІОМ№252, 168: PATTERN-8, W8$: ВЕТОК 
N 

682 РОБІТІОМ512, 176: РАТТЕКМ- 1, WAS+WAS : 
RETURN 

683 РОБІТІОМ252, 1592: PATTERN-8, W8$--WA$-W 
АФ: RETURN 

684 CURSORZB, 23: PRINT"9":POKE45973,134: 
GOSUB^642: IF PEEK ($8816)=1 THEN RETURN 

685 FOSITION264, 176: РАТТЕКМ- 16, DK$: POKE 
45969, 135: 09-80: RETURN 

699 КЕМ----(-М-І-Т--------------- 

700 UU=PEEK ($8814): IF UU=O THEN RETURN 

705 U1-PEEK($8812):U2-PEEK ( $881 3) : UT=45 
056%11-02ж40 

708 IF UU=3 THEN 820 

710 608508770: GOSUB775: SC=SC+50 

720 ОМ FEEK($8814) GOTO 721,725,760, 740, 
745 

721 POKEVFP,FEEK($8812) +2: РОКЕУР+1 , РЕЕК‹ 
$8813) : РОКЕУР +2, 4: РОКЕУР +Z, 64: РОКЕЧР+5, $ 
42: РОКЕМР +7, 1: GOTO 765 

725 РОКЕУР,РЕЕК( 68812) +2: POKEVP+ 1 , PEEK ( 
$8813) : POKEVP*2, 4: РОКЕУР+5, 02: РОКЕУР+5, $ 
24: POKEVP*7,1:GOTO 765 

740 YL=YL+5: SC=SC+1001 CURSORPEEK ( $8812) 
s PEEK ($8813) t PRINT"YL 0&9eNE" : MUSIC" +#ВО+И 
А+#Е ": GOTO 747 

745 YM=YM+5: SC=SC+ 1 00: CURSORPEEK ( $8812) 
s PEEK ( #881 3) : PRINT"YMOe&eIN":MUSIC"--8bEO-*& 
D+#C" 

747 CURSORPEEK ($8812) , PEEK ( $8813) PRINT 
" ә  ":GOTO760 

760 POKE$8812,0: POKE$8813,0:POKE$8814,0 
s RETURN 

765 POKE VP*8,30-BI(BS) : POKEVP*7, 2: VP=V 
P+9: GOTO 760 

770 FOR I=1 TO S:POSITIONU1X8,U2X8:PATT 
ERN-15, BU$ (І) : MUSIC"FO"1NEXT I 

771 POSITIONU1*8,U2*8: PATTERN-16, CL$+CL 
$*-CL $«CL $: RETURN 

772 FOR I=3 TO 1 STEP-1 :POSITIONE1X8,E 
2X8: PAaTTERN-16, BUS (І) : MUSIC"CO": NEXT I 

773 POSITIONE1*X8,E248: PATTERN-16, UNS: RE 
TURN 

775 PUKEU さ 。 О: PDKEU さ + 1 。 0: POKEU3*40, O: POK 
EU さ +4 1 。 O: RETURN 

780 РОКЕЕЗ, 30: POKEE 3*1, 50: РОКЕЕЗ+40, 30: 
PUKEE さ +4 1 。 30: RETURN 

799 REM----- KILLERD х フッ カリ ---- 

800 FOR І-56480 TO さ 6506 STEP9 

802 IF (РЕЕК (І) =0) ¥#(PEEK( 1+1) =0) *(PEEK ( 
I+7)=O) THEN 60508550: 5070810 

805 NEXT I:RETURN 

810 POKEI,2:POKEI*1,1:POKEI«*5,234:POKEI 
*7,11 POKEI*3,8: РОКЕІ+2, 1: 60Т0805 

819 КЕМ--- マシ "カル n*7- ホッ クス ーーーー 
ЕЗ=РЕЕК ( $8809): IF (F さ =1 ) +(F さ = マ ) THEN 


E1=(U1+EX(F さ ) ) 』E2=(U2+EY(F さ ) -5) : GOT 


Е1=(01+ЕХ (РЗ) -5) : E2= ェ (U2+EY(F さ ) ) 
823 ЕЗ=45054+Е 1+Е2ж40:Е4=РЕЕК (ЕЗ) 
824 IF E4= さ O THEN 760 
825 IF (Е1<4)%(Е2<1)%(Е1>27)%(Е2>22) TH 

EN 760 

826 GO0SUB775: GOSUB780: GOSUB770: GOSUB772 

827 Е5-(Е1/5)%(( (Е2%1) /4) -1) k8: POKESS07 


Z*PEEK($8815) ,0:РОКЕЗ5074%(Е5-1)%2,2:Ебв- 
35072*ES*3 

828 IF ((FEEK(E6) -5) 15) X(PEEK(EG6*1) =1 1 
) THEN880 

829 GOTO760 

830 ON PEEK(MC) GOTO B31,835,837.839,84 
1 

831 GOSUERS849:MUSIC"C1bE2DOFG-*A1DCO" 

852 FOR I-36480 TO VP-9 STEPF9:IF (FEEK( 
I)=O)*(FEEK(I+1)=O) THEN 834 

855 РОКЕІ%5.55:РОКЕІ%7,2:РОКЕІ%8.100-БІ 
(BS) 

834 NEXT I:GOTOB845 

835 GOSUEBS849:POKE$88OB,PEEK ( $BBOB) *10:8 
C-SC*1000: CURSORS,9:PRINT"X« TEL 10 €t 
j ЗАЛ »2":MUSIC"C2DSESCODEFGDFGC " : CURSO 
RS,9:PRINTSFACE$(25):GOTO845 

837 IF РЕЕК(%В816)<>1 THEN GOSUBB48: БОТ 
0845 

838 GOSUE847:GOTG 845 

859 50508949: CURSOR10, 10: PRINT"DAMAGE - 

о" 

840 FOR IzOTO21POSITIONSO6-I*18,156:PAT 
TERN-8, "<B+++$B< "t MUSIC"*4D2ECO":NEXT 1: 
CURSOR10; fOT PRINT" "TPLsOTGOTO 
845 

841 GOSUBB49! CURSORS, 9: PRINT"BOUNS ROUL 
ETTE hit any key!" 

842 BO=INT (RND (1) #999) 310: CURSOR13, 101P 
КІМТВО: GETBO$: IFBO$-"" THEN 842 

845 SC=SC+BOI CURSOR13, 10: PRINTBO: MUSIC" 
CODDEEFFGGAAB" 

844 CURSORS, 9: РАІМТВРАСЕФ (27) 1CURSOR13, 
10: PRINT" 

845 U12151U2z11:U3245511: GOSUB775: GOSUB 
7701 MCxMC-*1:G0T0760 

847 GOSUBS849: POKE$8816, 0: CURSOR7 , 91PRIN 
T"NORMAL YMILNE RETURN":RESTORE1520: 6050 
B1500: MUSIC" -CO-E-ABDSGFDODC " : CURSOR7 , 91 
PRINTSPACES$ (25) : RETURN 

848 GOSUB849: POKE$8816, 1: CURBOR7, 9: PRIN 
T"SUPER YMILNE CHANGE": RESTORE 1550: GOSUB 
1500: MUSIC" «CO*E«*FD2SGBEODF " : CURSOR7, 9: P 
RINTSPACES$ ( 25) : RETURN 

849 FOR I=1 TOS: CONSOLER! MUSIC"RS": CONS 
OLEN: MUSIC"*FSB1*C"1NEXT ItRETURN 

850 REM----- メン フリ アーーーーーーーー 一 

855 GOSUB90: GOSUB94 

860 POKE$8800,P:POKE$8801, 0: POKE46005, 3 
Os POKE46007, 30 

865 POKE45927,30: POKE45967 , SO: M- INT(RND 
(1) k2) +1 

870 ОМ M GOSUB873,874 

871 RU=RU+ 1 : CURSDR さ 7 。 14: PRINTRUt RB=RB+ 1 
: IF RB=4 THEN КВ=1 : SGY=PEEK($BBOB ) : POKE$8 
817,1: РОКЕФВВОВ, O: БОТО 960 

872 PRINTCHR$ ( 6) : БКАРНС : MUSIC"RO": BDT ロ 2 
о 

873 MUSICS2$: RETURN 

874 MUSICSS3$:RETURN 

880 ON РЕЕК‹%8817) +1 GOTO 830,881 

881 BB-1:GOTO 760 

900 REM------ ENDING -------- 

910 MUSIC"-DA4R1-D3-DOR-DR-D5-F4-EOR-E4- 
DOR-D4-4C1-D7RO" 

920 IF HI«SC THEN HI=SC: CURBORSS, 7: PRIN 
THI 

925 FOR I=1 TO10 :CURSORS9,9:PRINT"G A M 

E O V E К": MUSIC"BS": CURSOR9, 9: PRINT "IE 
WE 5 12 Ш № 12 liz":MUSIC"CS":NEXT I 

950 CURSOR9,9:PRINT"TRY AGAIN [Y/N1" 

940 GETAW$:IF AW$-"Y" THEN GOSUB90: ВОЗИ 
B91: GOSUB94: GOSUB95: PRINTCHR$ ( 6) : GRAPHC: 
GOSUB1080: GDTD2O 

945 IF AW$-"N" THEN FRINTCHR$ (6) : GRAPHC 
: END 

950 GOT0940 

959 КЕМ------ RFX д%-і” ------ 

960 PRINTCHR$ (6) : GRAPHC: MU-47 

961 CURSOR9,9:PRINT" BOUNS STAGE ":MU 
SIC"FSA6E2ESFF7FDSC2CCOFC9RO" : PRINTCHR$( 
6) 

962 FOR 1=1 TO 25:G805UB96: РОКЕМР+2, 3: MP 
=MP+ さ s NEXT I 

963 FOSITION120,88:FATTERN-16, CL$+CL$+C 
L$-«CL $ 

964 FOR I-O TO 31:G608UB97:NEXT I 

965 FOR I=0 TO 231GO0SUB98: NEXT I! TI$z"O 
00000" 

966 USR( ま $BFDO) : PRINTCHR$ (6) 

967 CURSORS2,0:PRINT"£XX&X*kK*t": CURSORS2 
s 1: PRINT" R” 47" T2": CURSORS2, S: PRINT" BOUN 
S":CURSOR3S2,4:PRINT" STAGE": CURSOR3Z2, 5: 
PRINT"x*xxxxxxx" 

968 CURSORS33,8: PRINT"ROUND" t CURSORS35, 9: 
PRINTRU: CURSORS3, 11: PRINT"COUNT " : CURSORS 
5, 14: PRINT"SCORE": CURSORS3, 161 PRINT"TIME 


970 USR($94A00):8G08UB700: MUSIC MUS ( MU) t M 
UzMU-1:IF MU<1 THEN MU=47 

971 IF BE=1 THENBB-zO!GOTO9BO 

973 CURSOR15, 11: PRINTHA$ (НА) : HA=HA+1: IF 

HA=3 THEN HA=i 

975 FOR Ізі TO BS:NEXT I:CURSORS33, 171PR 
INTMID$(TI$,3,2) 3" 1 " 5MIDS$(TI$,5,2) 

976 IF VAL(OMIDS(TI$,3,2))22 THEN MUSIC" 
-CO«C-C*C-C«C-C«C-C": 6070990 

977 CURSORS3S, 12: PRINTBU: CURSDR さ さ 。 15: PRI 
NTSC: GOTO 970 

980 Ui=15:UZ=11: U3=45511: GOSUB775: GOSUB 
770 

782 BU=BU+1: SC=SC+BUX5SO: IF BU=24 THEN G 
OSUB849: SC=SC+1 0000: MN=MN+1 : CURSOR35, 12: 
PRINTBU: CURSORS3, 15: PRINTSC MUBIC"R9CSF7 
CAC*CA«E«F2BAEFD7FEGSDSC*C9RO":GOTO 990 
985 GOTO 970 

990 FOR Ізі TO 20:CURSORB, 9: PRINT"BOUNS 
STAGE END":MUSIC"&A3": CURSORB, 9: PRINT "i$ 
[ДЕШЕ EMR (EM ":MUSIC"CS":NEXT I 

995 RU-RU-*1:POKE$8817, 0: РОКЕФВВОВ, SY: MU 
SIC"R9R": BS=BS+1: IFBS»4THENBS-4 

997 GOSUB90: POKE$8800, P: POKE$8801,01 ВОТ 
О 872 

1000 REM------ I-N-I-T------------- 

1005 FOR Ісі TO 25:UX(I) CX: UYCID CY 

1006 CX=CX+5:IF CX>25 THEN CX=5:CY=CY+4 

1008 NEXT I:RETURN 

1010 MC-39856 

1012 FOR Ізі TO INT(RND( 1 ) *2)+1 

1015 FOR J-4 TO 1 STEP-1:81-PEEK(MC-*4) : 
S2zPEEK (MC*J-1) 

1020 FOR L=1 TO INT(RND(1)*X2)*1:83-281:8 
1282:82-83:NEXT L 
1025 POKEMC*4,81:POKEMC*J-1,S82:NEXTJ, I 
1030 RETURN 


1050 WA$-"rwvYXLunkb":UNSz"11r1*4 ズン ョ モ ォ う ゅ 
THI UF олти з л" 

1051 C1$-STRINGS$(CHR$(0),2):C2$-C1$4C1$ 
1C3$-STRING$ (СНКФ (0), 12) 

1052 ВИФ 1) =C16+CHRS ( 1) +СНКФ (5) +СНКФ (15 
) +СНКФ (30) + "== ェ ヘラ 1529 31" *C1$-"l Ex Sz K 
Etu" 

1053 BU$(2)-C1$*CHR$(0)*CHR$ C3) + じ HR$( 15 
) *CHR$ ( SO) + "zz" CHR$ (50) +CHRS (7) +CHR$ (5) 
*CHR$ (1) *«CHR$ (6) +CHR$ ( 15) +CHRS (5) "3" +C 1 
$+" А ФАП “аі” 

1054 BUS$((3)zC3$-"&EN"«CHR$(4) 4"3"4C3$"^ 
Р Ш" 

1055 CL$(1)z"a1"«*CHR$(25)-"4g3"-CHR$ (7) 
+ "Шо " +CHR$ (7) +CHR$ (27) +" 1-68" +СНЕФ (14) + 
CHR$( 16) *CHR$ (7) +CHR$ (34) +" HIIR > 60 gp 

1056 H1$9CHR$(4)*"B! "+CHR$ (5) +"#N"+CHR$ 
(28)+"®9:"+СНЕ®%®(24)+"27"+СНВ®(&)+"5С"+СНЕ% 
(4) *CHR$18) +CHRW (4) +CHR€ (B) + "ВВ" +СНЕФ (2 
8) +СНКФ (12) +" "+CHR$ ( O) +CHR$ (8) 

1057 СФ(2) =Н1%+СНЕФ (20) +" сае" +СНЕФ (18) 
+CHR$ (8) 

1058 І11%=СНКФ (0) +СНКФ (0) +СНКФ (1) +СНКФ (2 
) *CHR$ (4) *CHR$ (4) *CHR$ (8) *CHR$ (17) +СНКФ ( 
18) +СНКФ (16) +СНКФ (8) *CHR$ (B) *CHR$ (4) «CHR 
$3) +CHR$ (O) *CHR$ (CO) *CHR$(O) + "а" 

1059 CL$((3)211$4CHR$(24) *CHR$ (4) +CHRS ( 4 
) *CHR$ (21) *"|[90" -*CHR$ ( 10 +CHRS ( 2) +CHRS (2) 
*CHR$ (4) +" 攻 "+CH CO) 

1060 Mi1$-" L'QLBHF":M2$*CHR$(1)-'"'J"-CHR 
$ (6) +СНКФ C34) *CHR$ C34) +СНЕФ C34) "b" CHR 
$(0) *"F9AQQSf "1: M3$zM1$-M2$:M4$zM1$«*CHR$( 
оу +" ^rrr7" 

1061 WB8$=WA$+WA$+WA$+WA$+WA$S+WA$+WA$+WA 
$ 

1062 S1$="+C3+CG+C+E7+C3+CG+C+E7+F3+E+D 
+C+D+D+A+A+G+F+E+D+C9":REM OPENING 

1063 52$="+E3+#D+E+G+B+G+E+C+E+#D+E+G+B 
+G+E+C+A+G+F +F +#D+CB+C+D+E+F +6G+F+E3FC 

1064 53$="F4FG#AGFFGG#DCGF7R1F4FG#AGFFG 
G#DCG#DR9" 

1065 DK$=CHR$(0)+CHR$ (1) +СНКФ (1) +СНКФ (5 
) *CHR$ (1) +СНКФ (15) +СНКФ (23) *CHR$ (25) + "ЫІ 
ММУ 15 ЛЕНИЕ) ЕЕ?" 

1070 RETURN 
1080 FOR I=VP TO УР%45:РОКЕІ,О:МЕХТ I 


CURSOR11;9:PRINT"POISONOUS....Z" 

1113 MUSICS1$ 

1115 CURSOR13,20:PRINT"HIT АМҮ KEY" 

1117 GET AW$:IF AW$-"" THEN1115 

1120 PRINTCHR$ ( 6) : RETURN 

1500 КЕМ----- СНАМӨЕ ------- 

1510 FOR I-O TO 15:READ А:РОКЕІ%56848,А 
* NEXT IskRETURN 

1520 DAT40,0,0,0,0,0,170,85,128, 64。 128, 
64,128, 64, 128, 64 

1550 РАТАО, O, O, O, Os O, 255, 255,192, 192,15 
2,192,192, 192, 192,192 


969 PUKE4551 1,0: РОКЕ45512,0:РОКЕ45551,0 
:РОКЕ45552, 0: MP= さ 5O72 POKEMP +38, O 


リリ スト ググ POISONOUS Z vz у д F а аа а аара анан 


来春 受験 の 方 々 の ほとん どの 人 は , マイ コン を し まっ て し まっ た の で は な いで し ょ うか . 僕 に よい 考え が あり ます . それ は 信用 で きる 友人 
に 了 預け る こと で す . そう すれ ば 友人 が ソフ ト を 入力 し て 〈 むれ, Умит кта SCENA VEREOR RUP EUR, 
いい と 思い ます . 押し 入れ に し まっ と く よ り も ずっ と いい と 思い ます . PS. ミ ン キ ー モ モ や クリ ー ミ ー マ ミ より も カト リー ニ ウ ユ ン ネ ミ が 
iQ ` いい 。  P.S.2 映画 好き は お らん か た な. 


pio 


リリ スト グ POISONOUS Z マシ ン 語 リス ト 


(プレ ー ド ・ ラ シンナー) 
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ІЛ АК2 POISONOUS Z マシ ン 語 リス ト 


C3 21 99 


区 祝 JR-100 特 集 初 登場 さす が 快 人 さん だ な 一 . 話 は 変わ っ て , 皆さん は PiO を 読む と きど こ か ら 読 み 始め ます か ? (表紙 っ て 答え た 人 は い 
な いで し ょ う ね ) 私 は PiO バ ザー ル を 最初 に 読み ます . 売る の 方 を 読ん で いっ て 「JR-100」 の 字 を 見 付け る た びに た め 息 を つき ます (まあ 
区 る 買う は 本 人 の 自由 で すけ ど ). P.S. DO スク エア の 町 民代 さん の 記事 を 見 て 思っ た な ん で すけ ど あ れ ビ じゃ 選挙 の 宣伝 み た いで すね .。 P. 
[25.2 これ か ら は 0 伝言 板 に 川原 みどり る ん みたい な 内 容 の も の が 増え る の で は な いで し ょ うか . PS3 XlturboOiXi2 Xl 4WD だ ./ な 一 


スト ー リ ー 


皆さん ご 存じ の キャ ッ ツ ・ ア イ の リア デル 
タダ イム ・ ゲ ー ム で す 。 と パッ ケー ジ に 書か 
れ た カセット を 2 つ 持 っ て いた だ た あ な た だ が, 
な ゼ ザ ぜ か その 気 に だ な り 。 つい つい キャ ッ ジ ツ ・ 
デオ に で も まう こ 析 が スト ーー で すす 。 
ゲー ム に つい て 
パターン 1 

夜 の 街 の 大 通り を ハン ドジ ェ ッ ト て 飛び 
£T. この と き 相 手 (警察 官 ) は 攻撃 し て 
きま す が 。 自分 は 攻撃 で きま せん . また , 


; 3 N 
NN 


Cat's Eye 


あま り 横 に いく と カン バン や ビル に 当 だ っ 
て 落ち ます . そし て , ある 程度 進む と 美術 
館 が 見 を えて きま す . 


画面 は 地面 と ビル が 3D 感 党 で スク ロー _ 


ル し ます . パト カー も すぐ で 見 えな く な り ま 
+. と きど き カ ン バ ン が 吹っ飛ん で きま す . 
メト カー は 地面 か ら 生 を る よう に 見 せれ ば 
ери 
パタ ー ン 2 

館内 で す . 警棒 を 持っ た 敵 (警備 員 ) を 
キャ ッ ツ ・ カ ー ド で て 眠らせ て くだ さき るい (7 
ぐ 起 きま す ). 敵 の うち の だ れ か が 人 金庫 の キ 
-, また 他 の だ れ か が 人 金庫 の 暗唱 番号 を 持 


, 


遠く か ら 手 前 に 


ふっ と ん で くる 
か ん ば ん 
Z. 
— You 
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リス ト グ POISONOUS Z マシ ン 語 リス ト 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


e ISI XB 

っ て いる の で , キー と 暗唱 番号 を 書い た 紙 
を 取り ます . 

暗唱 番号 の 紙 を 取る と 画面 が 消 を えて 4 > 

タ の 数 字 が 出 て きま す ( す ぐに 戻る ). そし 


て 金庫 の 前 に 行っ て 何 か キ ー を 押す と 暗 鳴 


番号 を 聞い て くる の で , 素早 く インプット 
し ます . し か し , その 間 も 敵 は 攻撃 し て き 
iT. そし て 絵 を 盗ん だ ら 出 口 ま で ひだ す 
ら 帰 っ て くだ きい . 

パターン 3 


デモ 画 面 で す . 尾上 上 から ヘリ ュ プ ブタ て 逃 


Ui. この と き , 面 数 1000 点 の ボー ナ 
ス が 入り ます . 


` 
“° Rš 


ター ン 3 画面 。 


ATH. ТТЕ. (めがね ぐま ) 


117 


М2-700 


S-BASIC + Y УУ #8 


I XO 


LIIR | 
22 АЙ Ж tP 


DUS 


\ 


` 


ә 
R S 


- 


1HHHHHHI 


我 が MZ(700 で す よ ) で は , 面 数 が 多い 
パズル ・ ゲ ー ム が まっ た くく ない. それ で は 
あま り に も 悲し い の で , ひと つ 情 け な い な 
が ら も 作っ て み ま し た . 

面 数 だ け は 200 面 と , 自分 な り に 満足 す 
る まで に は あと 3km で らい の で き で す が , 
遊ん で や っ て く 〈 く ださい. 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


S-BASIC 
マシ ン 語 C000—FEFF 


な か な か の 出来 ば え . 200 面 も の デ 
ー タ を 作る に は , さぞ 根気 が 必要 だ 
っ た ろう ね . (O) 


まず BASIC 部 (リス ト 1) を 入力 し , HN 
違い が な いか よく 確認 し て か ら ,。 テー に 
も セージ も ます, 

次 に マシ ン 語 部 (リス ト 2) を 入力 し , Ж 
ェ ッ クサ ム 値 を 調べ て 間違い が な か っ た ら , 
先 の BASIC 部 の 後に 

SCOOOFEFFC470 (ファ イル 名 : 
EXODUS. M) 

ЕС; セーブ し て くだ る か 


BASIC 部 に つい て は 覚え て いま せん が , 
_ 敵 の 移動 する 所 に 工夫 し て , 1 匹 か 2 匹 ず 
っ 動かす よう に 工夫 し た の で (な い 頭 を 絞 
っ だ だ め 頭 が 消 を た て し まっ だ ただ), BASIC だ 
け の プロ グラ ム で ウォ ー ル ・ ゲ ー ム な ど を 
作る と き の , 参考 も どき に で も し て くだ る 
b. 

まだ マシ ン 語 部 分 に つい て は , だ いだい 
ЖАСС5ОС7 EVA ту7(Ж1) と , 
ワー ク ・ エ リア の 説明 ( 表 2) を 書い て お き 
47. サブ ルー チン は 単純 な 命令 ば か り を 
使用 し た の で , 解析 は 楽 ど ろう と 自分 で は 
思っ て いま す 。. 
な お , ここ で 説明 し だ も の は ほん の 一 部 
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\ 
D 


R1 アド レス ・ マ ッ プ (サブ ルー テ チン) 


アト レス 内 谷 


キャ ラク タ 表 示 
キー 入力 

画面 判定 

敵 移 動 
BGM も どき 
タイ トル 表示 


C595, 変数 AD() 一 AD(X) の 値 の マシ 
ン 語 サブルーチン を 解析 する と, いろ いろ 
わか る と 思い ます . 

ま だ, $C600 か ら は 面 デ ー タ DT, ° Н 
分 で 画面 を エディ イッ ト す る と 言う 人 は , Ж 
ち 込 む 必 要 が あり ませ ん . 


まず BASIC 部 を を ロード し て RUN す る Р, 

マシ ン 語 部 を 自動 的 に ロー ド し て デモ が 始 
まり ます . そし て , 2 つめ の デモ の と き に 
|1 | キー を 押す と ゲー ム に , [2] キ ー を 押す 
と エディ タ に , |3| キ ー を 押す と セー プ 
|4| キ ー を 押す と ロー ド と な り ま す . 

まだ た 3 つめ ゅ の BEST5 の と き , [P]* — 
を 押す と ゲー ム に , [EE] キー を 押す と エ デ 
Ая, |L| キ ー を 押す と ロー ド に , [S] 
ー を 押す と セー ブ に な り ま す (セー ブ や 
п- КЕЗ, 画面 ダー タ を セー プ , ロー ド 
する と いう 意味 で す ). 

る て ゲー ム で す が , あな だ は 人 を カー ン ソ 
ル ・ キ ー で 上 下 左右 に 操作 し て (いつ も 同 
じ キ ー し か 使わ な いと 言っ て ,。 け な き な い 
で くだ さる い ) 水 色 の ゴー ル ま で 行っ て くだ 
る さい. 無事 ゴー ル へ 着け ば 1 面 ク リア で , 
ボー ナス が 入り ます 。 

し か し , 途中 に 敵 な ど が いて そう 簡単 に 
は ゴー ル へ 着け ませ ん (行け る こと は 行け 
る の で す が , 得点 が 低い ). 

次 に キャ ラク タダ に つい て 説明 する と ,。 š 
ず 青 い ブ ロッ ク が 押し て 動か すこ と の で き 
る ブロッ ク で , その ブロ ッ ク を 押す 方 向 が 
ЗЕН», 宝 の 場合 に 押し て 動か すこ と が で 
きま す ( 青 い ブ ロッ ク を 動か し て 室 あ つぶ 
す と 15 ポ イン ト )。 そし て 黄色 いや つが 200 
点 で す 。 

まだ 赤い ブロック は 上 下 左 右 の いずれ か 
の 方 向 か ら 押す と 壊れ , 壊す と 10 ポ イン ト , 


表示 物 の X 座標 
表示 物 の Y 座標 
入力 
出力 
キャ ラク タ の 番号 


敵 ( 緑 色 の や つ ) を 青い ブロ ッ ク で 囲む と 宝 
に な り , 300 点 に な り ま す . 

な お , 面 ク リア の ボー ナス は 500 点 で す . 
前 に 書い た よう に ボー ナス は 500 点 で は ず 
る いと 言う 人 は , 敵 を すべ て 殺す な り , Ж 
を 全部 壊 き な いで 取る な り , プ ブロック を す 
べ で て 壊す な り し て くだ さい 。 ボー ナス が 数 
TuS REY. も ちろ ん , ЛОТ ӨЗ 
て 捕まる と ゲー ム ・ オ ー バ バー です. 

ゲー ム ・ オ ー バ ー 時 に スコ ア が で スト 5 
に 入っ て いれ ば , 名 前 の 登録 が で どき ます. 
[e] | っ | キー で 文字 を 選び , | SPACE キー 


で 文字 を 登録 し て くだ さる い . 


カー ジル 才 一 で カー マッ ル を 動か し , 
[1 | キー で 空白 [2] キー で 青い 壁 , [3] キ 
ー で 右 か ら 押 す と 壊れ る 壁 , |4| キ ー で 左 
か ら 押 す と 壊れ る 壁 , |5| キ ー で 下 か ら 6 押 
す と 壊れ る 壁 , |@| キ ー で 上 か ら 押 す と 壊 
れる 壁 。 [7| キ ー で ゴー ル , [8| キ ー で 宝 , 
[9] — c ik, [9| キ ー で 人 , に | キー で 
CLS, [| キー で エン ド で すか が, カー ソル 
を 動か し な が ら 壁 な ど を 表示 させ る こと も 
で き ます 。 

Жаз, 敵 は 5 人 (?) ま で 設定 で どき ます. 
まだ エディット が 終わ っ た だ たら 。 ぜひ 画面 デ 
ERTS ss l T R iU r. 

フムフム … こ の プ ブロック は 押し て … 


SE 
8 š 
E 
Ей 
BE 
Т 
зде 
Ей 
8 
gu 
Be 
BE 
ү 


ーー 


が ん が ん 送る ぞ 一 / PS. 1 ユー ザー の 和 皆さん PCG に 頼 


( 桜 だ ん ご は や め て 本 名 に 戻る PB&X1 命 の BPC 会 長 こ と 藤田 伸一 ) 


EE ポー 
Q (O) Q © БББ, PiO な ゲー ム の 人 気 投票 結果 に 私 が 載っ て いる ./(PB-100 の SPACER) 努 , 努力 の 結果 だ …. 最近 3 本 と も 没 っ た の で PiO に は 向い て 
Ол Ол いな いん だ と , 他 誌 で うろ ちょ ろ し て まし た . LPL, 私 は 復活 する の で あっ た . 
C 9 すぎ で す / PCG は 確か に 手軽 ど だけど 、 ゲ ー ム を つま ら な くす る 1 つの 原因 で す ( だ か らい まい ち プ ログ ラム が 増え る ん だ ). 


DL]. リスト 1 EXODUS BASIC リ スト 


10 "^4d4d4d4 44444 454k44544445R4 4454454 k4k 


20 7% & 
20 >s EXODUS! " 
40 * * 
50 7% 1984 年 12 月 Z1 В * 
60 + ж 
70 7% MADE BY M.ICHIKAWA ж 
80 7% % 
90 "БАЖА ҚАЗА 1 


100 0=%С0952: 0-%СООО 

110 CONSOLE: FOKE ($3444), O:LIMIT$BEFFF:COL 
ORs s 7:0: CLS: IFPEEE ( $CO4B) > 117THENCURSOR 
5,12:РКІМТІ6, "652^ 47 Әтуиу 62^7 gnu-t" 6v 
T472.8":LOAD"EXODUS. M" 

120 DIM АРФ (350), МФ (2), НІ (60) XC) 』Y(6) , DH 
(5),KAC20, 10) , ADCB) , TA(4), YO(4) SOCA) 
130 AD(1)-$COB3: ADC2) 2$COCO: ADC 32 2$C100: 
Ар (4) =%С160: Ар(5)-ФСЗВО: AD(6 ) -$C470: AD (7 
)-$C4DO: AD( 8) - $CSA1 

140 ТА(1) =-1:ТА(2) =4: TA(2) 20: TA(4) =0 

150 YO(1)20: YO(C2) O0: YOCS0 2-1: YO( 4 ) =1 

160 ҒОКІғ17026:АҒ%(1)-чСНК%(1%64):МЕХТ 
170 АҒ% (27) =". ": АЕФ (28) ="! ": ДАРФ (29) = "7": 
АЕФ (30) =" ":ҒОКІз1Т05:Н1(1)-6000-1Ж1000: 
МЕХТ 

180 № (1) ="М.ІСНІКАИА": МФ (2) = "Т. ITO" : № ( 
3) = "А. КАМАМІЅІ ": МФ (4) = "Н. YAMADA" :N$ (5) =" 
Dno Rc Moss 

190 TEMFOA:USR(GAD(C5)):CLS 

200 CURSORI10,3:PRINTIS, J"XXXX* MENE X*xx" 
s MUSIC"R2" 

210 СОК5ОК10,6:РКІМТГІ7,1"1 PLAY EXODUS": 


| MUSIC"RZ" 
220 CURSOR10,8:PRINTI7,1"2 EDIT SCREEN": 


ael اق‎ 

50 СОК5ОК10,.10:РКІМТІ7,1"5 SAVE SCREEN" 
iMUSICU WE. 
240 CURSOR10。 
"€ 

50 СОКВ0К7, 15: РКІМТС4, "MADE BY": MUSIC" 
R3":CURSORIS, 15: PRINTI 2, J"COMPAC" : MUSIC" 
R2":CURSOR194,15:PFRINTL4, J"(C) 1985":MUSI 
С"Кё" 
260 MUSIC"BO-«CO":FORI-Z6TO18STEF-1:MUSIC 
"EO":CURSORI,;2:PRINTLIS, J"U": POKECQD),I-1, 
1:РОКЕ (0), 11USRCADC12 )  CURSORI +3, 1: PRINT 
"ЕШ NEXT: CURSORI8,2:PRINTES, 1" HEU": M 
USIC"RO«*CO":FOKECO),2 
270 MUSIC"RS":FÜORI:-19TO36: MUSIC"CO" : POKE 
(0) sI, 1:USR(CAD(120) : CURGORI -14 1: FRINT" [ME 
"NEXT: CURSOR 26,1:PRINT" HERES "Аі 
280 FORH-1TO25:FORI-1TO04O0:GETE$:kK-VAL(CE$ 
): QNEGOTOS530,910,1900,1980: NEXT 
290 А=-А 
200 IFA-1THENCURSOR7:18:FRINTL 6, J"FLEASE 
HIT NUMBER KEY" 
510 IFA--1THENCURSOR7;18: FRINTSFC(21) 
220 NEXT:CLS 
550 FORI-23TOSSTEF-1: CURSOR104I:PRINTEIS, 
l'X*xx* 


12:FRINT[7s 1"4 LOAD SCREEN" 


7: CURSOR15, 3: PRINTLEJ, "BEST S":NEXT:NEXT 
: TEMPO 7 


240 FORI-1TOS:FORJ-OTOS: CURSORJ, I X245: PR 

INTL2*I,JUSING" NO $9 ###### BY f 

(C SISHI CI) МФ (І): NEXT: NEXT: FORI-1TO10:FQ 
RJ-1TO7:CURSOR1S, 3: РКІМТЕЈ, J"BEST S":NEX 

T: NEXT: TEMFO4 

350 FORI-1TO700:GETE$:IFE$- 

360 IFK$-"S"GOTO1900 

370 IFK$-"L"GOTO1980 

380 IFK$-"E"GOTO910 

390 NEXT 0 

400 CLS: CURSOR4,2: РКІМТГЕ7, ]"+ー+ー+ SCORE 

ADVANCE TABLE +-+-+" : TEMPOG 

410 РОКЕ (0),7, 6: РОКЕ (0), 7: USRCADCI) ) : РОК 

Е(0),7,9:РОКЕ (0), 5: 05К (Ар (1) ) :РОКЕ (0), 7, 

12: РОКЕ (0), 5: USRCADCI)Ó) 

420 РОКЕ (0 ),7, 15: РОКЕ (0), 7: Ј5К (Ар (1) ):РО 

КЕ (0), 9, 15: РОКЕ (0), 8:UBRCADC1)) : POKE (0), 

9,18: 05К (Ар ‹1) ):РОКЕ (0), 7, 20: ШЅК (Ар (1) ) 

430 РОКЕ (0), 9, 22: UBRCADCID ) * РОКЕ (0+1), 20 

:POKE (0), 4: USR (AD (1) ) :РОКЕ (0), 33, 20: POKE 

(0), 6: 05К(Ар (1) ):РОКЕ (0), 1 

440 A-7:B-6:G0SUB2060: MUSIC"G161B1G3":P0 

KE(CO) , 2: CURSORS, S: PRINTU7, 1"200" : GOSUBZO 

70: А=6: В=3: 505062080 

450 А=9: В=9: 505082060: СОК50К7,9:РКІМТГС7, 

1"% sit" : TEMPOS: MUSIC"-CZCZ": TEMPOA: cu 

RSOR7,9:PRINT" 5  ":CURSOR9,8:FRINTLI7 

s 1" 10" : GOSUB2070: A=9: В=5: 505082080 

460 4-9:B-212:G08SUB2060: MUSIC"R4": CURSOR1 

ыы Up bu АҒЫ opi otim CET 
:GOSUB2080: A711: В=15: GOSUB2060 

470 CURSOR7; 15: PRINTLU7, 1" ЖАЯ": TEMPOS 

: MUSIC" -C3C3": ТЕМРО6: CURSOR7 , 15: PRINT" 

ШЕШ ":СОКЅОК11,15:РКІМТ" ҒЫШ  ":POKE(CO 

) s? USR(AD(1 ) ) 

480 POKE(Q).7:POKE(O) 。6:USR(AD(1 ) ) CURSO 

К9,14:РКІМТІ7,1"15":А-А-1:6505МВ2070:А-15 


"F"GOTOSSO 


+ ЕЧ > қ Xp * ` 
Ti ^ - Ue 


BEST 5 XXXX":CURSOR1O0,I*1:PRINTSP , 
C(16): MUSIC"R1":NEXT:FORI-1TO10:FQORJI-1TO : 


この ゲー ム の 感想 を , PiOPiO 等 に 書い 
て 出し て くれ れ ば 幸い で す . まだ この ゲー 
ム は , 僕 が 中 学生 の と き に 作る 最後 の ゲー 
ム に な る と 思い ます . 


: B-S: GOSUB20BO 
490 А=35: В=20: 505082060: ҒОКІ -3S5TO13STEF- 
1: CURSORI +2, 20:РКІМТ" BW ":РОКЕ (О), І: РОК 
E( D) 41: USR(CAD(C1)) 

500 POKE(Q),1-2: РОКЕ (0), 6: USR(aD( 1 ) ) : MUS 
IC"R1":NEXT: ТЕМРО4: CURSOR? , 20: PRINTI7, 1" 
USIC"ASG1E3":POKE(C(CO).7:POKE(CQ) 


510 CURSOR15;,19:FRINTE7, J" 300" 
520 USR(AD( 1 ) ) : TEMPO7:FORI-37TO13STEP-1: 
MUSI C"+CO":POKE(0), 4: РОКЕ (0), TEUSR(AD( 1 ) 
) : CURSORI +2, 20: PRINT" BE ":NEXT 

550 TEMPOS: MUSIC"ASROASROGIF4«-CiB1A1-CIEB 
1A81R2*CZ2R24*C2R2-4C2R2":FÜRI-1TO3O0: TEMPO7: 
CURSOR13,20: PRINTE7, JM, ^," š MUSIC"4CO 
"SCURSOR13,20:PRINT" ҰЖЫМ  ":NEXT 

540 FORI-1TO2000:NEXT:GOTO190O 

550 CLS:CURSOR6:;12:PRINTLI7, J"INPUT STAGE 
NUMBER 1-200 3" 

$560 CONSOLE 12,1, 31, 6: INFUT "БЕ: "':Е% 

570 R=VAL(R$):IF(R=>201)+(R=<0)THEN MUSI 
С"+СЗ":бОТО 550 

280 CONSOLE:CLS:R-R-1 

590 FORI-64T080: FUEE( まじ さ ビ 9 ) 。 I:USR(AD(5)) 
: NEXT 

600 SC-2:M-A 

610 HAzO:IFRzZOTHENHA-1 

620 R-R*1*:IFR-2O1THENR-1:IFHAà-1THEN2090O0 
630 AD-$C600-(R-1)*$48: МЕ=0: FORI-1TOS5:DH 
(I)z21:NEXT* TI 22000: TA=0:KB=0:MU=1 

640 РОКЕ(%С5С9),%С9:05К(Ар(8)):РОКЕ(ФСӘС 
9), $3E: POKE (0), 3: ONMGOTO^6SO:FORI-1TOM-1: 

FOKE(Q),IX3,2:USRCAD(C1)) : NEXT 

650 FORI-zOTO19:KkKACI,0)29:KACI, 9)z9:NEXT: 
FORI-OTO9:KA(O,I)29: KAC19, I) =9: NEXT 

660 FORI-1TOS: SO (1) =0: NEXT: BG-O 

70 CURSORÍ18,2:FRINTLI7. 1"65СОКЕН ЫЫЫ '' ; R 
IGHT$("OOOOO"-«-STR$(SC)6): CURSORZ27,2*:FRI 
NTL7, J"ROUNDIMEZZZal lE ":RIGHT$('"OOO"4S 
TRS$CTI244): CURSORZA4, 2: FRINTE7, JRIGHT$("O 
O"«-STR$(R),3) 

680 FORI-1TOS8:FORJ-1TO018:A-FEEK3(AD):4A$- 

RIGHT$("O"-HEX$(A4), 2): AaD-AD*1*: B-VAL (LEFT 
$(A$.,120) +1: CVAL(RIGHT$(A$. 1) ) +1 

690 р=В- 1: ONBGOSUB1 250, 1240, 1400, 1400, 14 
00, 1400, 1290, 1300, 1510, 1410: J=J+1:D=C-1: 

ONCGOSUB1230, 1240, 1400, 1400, 1400, 1400,12 
90,1300: 1310, 1410: NEXT: NEXT 

790 5Р=2:1ЕМК=<%ТНЕМбР:=1 

710 IFTA-OTHENTA-1 

720 IFHKB-zOTHENEKEB:-1 

750 1ЕМК=ОТНЕММК=1 

740 USR(RD( 2 ) ) : А=РЕЕК (0+8 ) : ONAGOTO730.76 
0,770,780: 65070790 

750 A-2-(X-22): ONAGOTO790: РОКЕ ( $C10F), 2: FO 
КЕ (0+2), КАХ /2-1, (Y-4) /22 , KACX 72-24 (Ү--4) 
/2)* USRCADC3)) : АзРЕЕК(049):650701420 

760 FPOKE($C1OF),.3:PFOKE(Q*2),. KACX/2*1. (Y— 
4) /2») ,KAKCX/2*2, (Y-4) /2) *USRCADC2)0) : A=PEE 

к(0+9) :650701470 

770 А=- (Ү=6) : ONAGOTO790: РОКЕ (ФСІОҒ ) 。 4: ҒО 

КЕ (0+2), КА(Х/2,(Ү-6) /22,КА(Х/2.(Ү-8) /2) : 

ОЅК (Ар (5) ) : А=ҒЕЕК (0+9) : 507015 20 

780 РОКЕ‹ФС1ОЕ ), 5: РОКЕ (0+2), КАСХ/2, CY-2) 
/2),KACX/2, Y/2) : 0ЅК (Ар ‘5 ) ) à А=РЕЕК (0+9) :6 

0701570 

790 РОКЕ (0+4), Х,Ү: РОКІ =1 ТОЅЕ: ОММЕ+ 180T08 
60 

Воо р=Х (МО) /2: EZ CYCMUD -4) /2 

810 KA(D,E)=0:A=-(KA(D-1,E)=1)-(KA(D+1,E 
)21)-K(KACD, E-12)0721)—- CEA CD, E*t12712: ОМА-500 

TO1640 

820 РОКЕ (0), X(MU) , YCMLD  DHCMUD , KACD* TACD 

H(MU) ) 』E+YU(DH(MU) ) ) :USR(AD(4) ) 

830 X(MUD-FEEECQ): YCMLD -PEEE (0+1) : DHCMLI) 
-PEEK (0+2) 

840 DXKMU) /2: 

850 MU:-MU-*1*:IFMU- 
860 NEXT: TI-TI-10 

870 CURSOR18,2:PFRINTL7, "SCORECMEZZZXA š 
IGHT$("OOOOO"4*STR$((SCO« 62): CURSOR27,. Z: FRI 

NTE7, "TIME  "sRIGHT$("OOO"4«STR$(CTIO;4) 
880 А--(КА(Х/2» (Ү- -4) /2)=8): ONAGOTO1620 
890 ON-(TI-O)GOTO1620 

900 GOTO740O 

910 CLS: CURSUR6。 
NUMBERTE 1-2001" 
920 CONSOLE 12.1,21,6: INPUT"EEEES":R$* 

930 R=VAL(R$): IF (R=>201)+(R=<40) THEN MUSI 
C"«*C3":GOTO 910 

940 CONSOLE 2 CLS: AD-$C600-t KR--1 ) *$48 

950 USR(AD(C8)) 

960 CURSOR18,2:FRINTLI7. 1" SCOREMEZZAA OO 
000": CURSOR27,2* PRINTE7, 2"ROUNDIEZEXES | I М 
Е 3000": CURSORZA4 , 2: PRINTI 7, JRIGHT$("OOO 
"*STRS$ORS),3):CXz2: CYz6: МКЕ= 1: НТ=0: AF =AD 
970 FORIZS1TOSB:FORJ-1TO18:A-FEEK3(CAD):A$- 
RIGHT$("O"-HEX$(A).,2)2): AD=AD+ 1: B-VAL (LEFT 
$(A$,1))+1:C=VAL(RIGHT$ (A$, 1) ) +1 

980 ONBGOSUB12304,1240,1250,1260,1270.4128 


E-ZCYCMUD) =4) /2: KA CD, E) =8 
2ME-*1THENMU-1 


12: РКІМТЕ7, J"'INFUT STAGE 


最後 に 700 バ バン ザイ Z 


Ü., 1290, 1300, 1310, 1320: J=J+1:0NCGOSUB1230 
s 1240, 1250, 1260, 1270, 1280, 1290, 1300, 1310 
s 1320: NEXT: NEXT 

990 USR(AD(7)):A=FEEE($C4C8): B= PEEK($CAC 
9):С-РЕЕк(ФСАСА): CURSORCX CY: PRINTE7. 1" 
21-52 2 

1000 ІҒ(Ат2512Ж(СХ2:22605МБ11В0:СХ-СХ-2 
1010 ІЕ(А>=247) ж (СХ<25626050МВ1180: CX=CX+2 
1020 IF(A2222)0X(CY260GOSUB1180: СҮ=СҮ--2 
1030 ІР (4=239) ж (СҮ<20) 65090В1 180: СҮ=СҮ+2 
1040 GOSUB 1180 

1050 IFBz127GO0SUB1200:GO0SUB;i22 

1060 IFB-191GOSUB1200: GOSUB1240 

1070 IFB-:223GOSUB1200:GO0SUB12*0 

1080 IFB-229GOSUB1200:GOSUB1260 

1090 IFBz247GOSUB1200:GOSUB1270 

1100 IFB-2251G08UB1200: GOSUB1280 

1110 IFB-25360SUB1200:GOSUB1290 

1120 IFB-254GO0SUB1200:GOSURB1:300 

1130 IF(Cz-251)0X*(ME-z5)GOSUB1200:GOSUB171 
o 
1140 
1150 


ІҒ(С=247) Ж (НТ:=0 ) 605081520 

IFC-223G08UB13:20 

1160 ІҒС-19160Т01240 

1170 АкА(СХ/2, (СҮ-4) /2) : Ј=СХ/2:1=(СҮ-4) 
/2: ОМА+ 1605081270, 1240, 1290, 1260, 1270,12 

80, 1290, 1300, 1190, 1520:5070990 

1180 A-KA(CX/2, (СҮ-4) /2) : Л=СХ/2:1=(СҮ-4) 
/2: ОМА+ 16050В1250, 1240, 1250, 1260, 1270,12 

80,1290, 1300, 1190, 1320: RETURN 

1190 МК=МК- 1: 560506813210: RETURN 

1200 ІҒКА(СХ/2, (СҮ-4) /2) -2 THEN НТ-О 

1210 IFKA(CX/2, (CY-4) /2) :BTHEN МК=МК—1 
1220 RETURN 

1230 CURSORJIX2,1X2-4:PRINT" 
„ 1) =0: RETURN 

1240 РОКЕ (0), 6: РОКЕ (0), 7Ж2 
1) KAJ, I )=1: RETURN 

1250 CURSORJX*2,IX24*4:PRINTEI2, 

KA(GI,I)22:KB-KB-41: RETURN 
1260 CURSORJIX2,IX2-44:FRINTEI2: 

KA CT4IO)z3: RETURN 

1270 CURSORJX2,IX2-4: FRINTEZ2: 

KACI, I )=4: RETURN ` 

1280 CURSORJX2,IX2*4:PRINTLI2, 

KA GTI 4 12:5: RETURN 

1290 CURSORJX2.IX2*4:PFRINTIO,S51"GOMEZAL " 
:KA( J,» 1)56: RETURN 

1300 РОКЕ (0), 7: РОКЕ (0), TX2, IX2-4: USRCAD( 
1) ):КАСЈ, I =7: ТА=ТА+1: RETURN 

1310 РОКЕ (0), 4: ҒОКЕ (0), JXE, IX2-4: USR(AD 
1)):КАСЈ,1)=8: MEME 1:2 ХМК) TX22 Y (OME) =4+ 
IX*2: SOCME D) 21: RETURN 

1220 РОКЕ (0), 3:POKE (QO), TX2,. IX24*4: UBRCAD( 
1 ) ) : KACJ, I) =9:НТ=1: X—JX2: Y24*I X2: RETURN 
330 СОМЗО ЕФ, 16,2, 36: CLS: CONSOLE: HT-O: M 

К=0: FORI-1TOB:FORJI-1TO18:KEACT, 1) =0: NEXT: 

NEXT : RETURN 

1340 ІЕНТ-065070990 

1250 CONSOLE6;:16,2,36*CLS: CONSOLE : CURSOR 
12,12:РКІМТІ5,1"МАІТ А MOMENT":FORI-1TO 

В: ЕОКЈ=1Т0188ТЕР2: АзкА(.7,12Ж16“КА(,.7%1.1) 
: POKE3 CAF) А: АР=АЕ +1: NEXT: NEXT 

1360 CURSOR13;15:PRINTE7, "AGAIN Y OR N" 
1370 GETA$:IFA$-"Y"GOTO910 

1380 IFA$-"N'"GOTO190 

1390 GOTO1370 

1400 FOKE(D,JIX2. I*X24-4: POKECOD) , S*USRCAD? 
1)):KACI, I) Dt KBzEB-* 1: RETURN 

1410 GOSUE 320: KA CI, 1) =0: RETURN 

1420 ONAGOTO1430,1440,17204.1460,1620,145 

0,1680:G0T0790 

1430 GOSUE1770:FOEE(O) 0: ҒОКЕ (0), ХҮ: USR 
(ADC1202: X-X-2: РОКЕ (0), 1: РОКЕ (0), Xš USRCAD 
(1)):6070790 

1440 КЕ-ЕВ-1:СИК5ОКХ-2.Ү:РКІМТІ7, 1" ЖҚШ 

Ш"іМЧИбІС"-С35С3":5С-5С%10:КА(Х/2-1,(Ү-4) 
/23л0:60701420 

1450 KA(OX/2-2, (Y-4) /2) =КА(Х/2-1, (Ү-4) /2) 
:POKECO246: РОКЕ (0), Х-4, YEUSRCAD (1) 2) EA CX 
/2-1.(Ү-43 /2)-0:60Т7014320 

1450 TA-TA-1:MUSIC"GOAOBOG3":KACX/2-14 CY 

-4) /2)-0:5С-5С»200:60701420 

1470 ONAGOTO1 480, 1490,1720,1510, 1620, 150 

0,1690:GOTO790 

1480 БОБОВ1770:РОКЕ (0), О: FOKE(Q) X, YSUSR 
CADC1202: X2X4*2: POKE(O) ,2: РОКЕ (0), Xt USRCAD 
(1)2:G0T0790 

1490 EEB=EB-1: CURSORX«2, Y: PRINTL7, 1" ЯҚАА 

3E"USMUSIC"-C3CS":SC-SC*10: KACX/2*1, CY-4) 
/2)-0:60T01480 

1500 KA(X/242, (Y-4) /2) =КА(Х/2+1, CY-4) /2) 
POKE (0) 6: РОКЕ (0), Х+4, YSUSRCADCIO ) : EACX 
(2+1, (Ү-4) /2) 20: GOTO1480 

1510 TA-TA-1:MUSIC"GOAOBOGZ":KACX/2*1,. CY 

-4)/2)20:8C-8C*200:G0T01480 

1520 ОМА50Т01520.1540.1720.1560.1620.125 

0,1700:G0T0790 

1530 908М81770%РОКЕ(0),0: РОКЕ (Q), X, Y: USR 
(ар (1) ) : У=Ү-2: РОКЕ (0), 3: РОКЕ (0+1), У: USR( 


<< 


SIX2-4:USRCAD( 


"IEAJ 


"Рена" : 
"чака": 
l'rwEES P: 
1" BEZALA": 


piO 


リス ト 1 EXODUS BASIC リ スト = ・ 


^AD(1)02:GOTO790 
1540 КВ-КЕ-1: CURSORX, Y-2: PRINTL7,. J" жа 
a": MUSIC"-C3C3": SC-SC*10: KACX/2, (Y—6) /2 
)-0:GO0TO1530 А š 

1550 КА(Х/2» (Y7B) /2) -KACX /2, (Y-6) /2) : POK 
ECCO), Ф: РОКЕ (0), X, Y-A:USRCAD(C120)0 : KACX/2, ( 
| Y-6 ) /2)20:G0T01530 4 

1560 TA-TA-1:MUSIC"GOAOBOGZ":KACX/2, CY-6 
)/2)20: SC=SC+200: GUTD15 さ O 

1570 ОМАБОТО1580, 1590, 1720, 1610, 1620, 160 
0,1710:G0T0790 

1580 GOSUE1770:POKE(CO),0:PFOKE(Q). X, Y: USR 
(AD(1)):Y=Y+2:POKE (O0), 3: РОКЕ (0+1), Y: USR( 
&D(120):G0T0790 

1590 CURSORX, Ү+2: РКІМТС7, 1 айры": MUSI 
C"-C3C3":SC-SC-*10:KA(CX/2, (Y-2)» /2) =0: GOTO 
1280 

.1600 КВ-КВ-1:КАСХ/2,Ү/2)-КА(Х/2,(Ү-2) /2) 
:РОКЕ (0) „6: РОКЕ (0), Х, Ү+4: USRCADCT2 2  KACX 
/2,(Y-2) /2)-0:60Т01580 

1610 ТА-Та-1:М056ІС"бОАОВООЗ5": КАХ /2, CY-2 
)/2)z0: SC-SC-*200: GOTO1580 

1620 TEMPOS:MUSIC"ASROASROGIFA4*CIB1A1-*C1 
B1A1R2+C2R2+C2R2+C2R2": TEMPO7:FORI-1TO3O 
:CURSORX,Y:PRINT" | MEX — ": MUSIC"-«CO": CUR 
бОКХ.Ү:РКІМТГ7, J"5 з ^," : NEXT: M2M-1: TEM 
PO4: IFM-OTHEN180O0 

1630 CLS:GOTO6:0 

1540 CURSORX(MLDO 。Y(MU) : FRINTE7, "ЖШ". 
":*MUSIC"ASG1ES": 50 (MU) =0: SC=SC+ 300 

1650 FOKE(Q).XXOMUD 。Y(MU) :РОКЕ (O), 7:USR(A 
(190: КАСХ(МО) /2, CY (MU) 4) /2)=7:ТА=ТА+1 
1660 IFME-z4THENSF-1 

1670 FORJ=MUTOS:X(J)=X(J+1):Y(J)=Y(J+1): 
DH(GI)-DHCI-1)2:80(J)0780GI*1) : NEXT: MEZME-1 
:GOTOS850 ; 
1680 CURSOR Х-4,Ү:РКІМТГ?, 1" ЯҚАА": MUS 
IC"-C3C3":SC-SC-*15:GOTO1450 

1690 CURSOR X*4,Y:PRINTLI7.1"ESSEZZ МОБ 
IC"-C3C3":8C-SC-*15:GOTO1500 

1700 CURSOR Х.Ү-4:РБКІМТСІ?. 1" КДЕ": MUS 
IC"-CS3SC3S":SC-SC*15:G0T01550 

1710 CURSOR Х.Үз4:РБКІМТІ?, 1" ЯС": MUS 


—— JAF2 EXODUS z УЖЕ) А F END I 


+7 
оо 
214 
оо 
CO 


ІС"-С5С35":5С-5С%15:50701600 . 
1720 MUSIC"C3F3E3GSA1G3FZ2": CURSOR10, 9: FR 
INTL4, 1"ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ":ЕОКТ=1ТОВ:С 
URSOR10,I-*49:PFRINTEI4, 1"Ж" $SPCC172 5 "ж": МЕХ 
T: CURSOR10,18:PRINTE4, Ј"ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
XXX*":COLORs 6 - - 

1730 A-500-(TA-0)*2000-(C(EB-70)x*5000-(CMEZO 
)X*3000: CURSOR12. 11:РКІМТОЅІМБ"### ROUND 

CLEAR" К: CURSOR174, 13: PRINTE24, J"BONUS '! "š C 


| URSOR16; 15: PRINTES, 1 А 


1740 А=А/100: TEMP07:FORI-1TOA: MUSIC" «CO" 
1750 СОКБЅОК18, 2: РКІМТЕ7, 1"5СОКЕ Ыш"; 
RIGHT ま ("OOO00"+STR ま (SC ) 6): SC-SC*100: CUR 
'S0R17,15:A-4-1: COLOR, , 5: PRINTUSING" 2 4 4 4€ 
"$5X*100: NEXT 

1760 MUSIC"RS8":GOTO620 

1770 TEMFO7:FOKE($CZC9?9),BG: USRCADCE)) : EG 
=BG+1 ; . i 

1780 IFBG-80THEN BG=0 

1790 TEMPO4: RETURN 

1800 CURSOR1*5.15:PRINTLIS, J"GAME OVER": MU 
SIC"E4D1C1E1D1CS+C3R1+C455E さ 3C3D7ROE4D1C1 
E1D1C3*C3Aa1-*C3G3E1C1DSD3D1CS4CZ2":CLS 
1810 FORI-1TOS:IFSC-:HI(I)THENNEXT:GOTO: 
90 

1820 FORJ-STOISTEP-1:HI (Л) HI GI-1): N$CT) 
-N$OGI-1): NEXT: JUZI:N$(GIU)-z"":HI (JU) SC 
1850 СОК50К11,4:ҒКІМТІ4,1"ЖЖЯЖЖ BEST 5 Xx 
XX" :FORI-1TOS: CURSUR6』 IX245: COLOR, S I: FRI 
NTUSING"NO 9 ###### EY & *&"sI$:HI( 
1)sN$CIO:NEXT į 

1840 МХ-21:М-1: ТЕМРО6 

1850 GETk$ 

1860 IFES$-"B"THENM-M-1:MUSIC"*CO": IFM-OT 
HENM- 20 ° 

1870 IFE$-"E"THENM-M*1:MUSIC"«*CO": IFM-Z1 
ТНЕММ= 1 

1880 IFK$-" "THEN MUSIC"*CO":N$(JIU) =МФ (J 
UD *AF $ CM) : M: 1: NXENX*1: IFNX-Z1THENMUSIC"R 
7:6070190 

1890 CURSORNX , Ј0ж2+5: PRINTE JU, JaF$(M):GO 
Т01850 

1900 CLS: CURSOR6,12:PRINTI7, J"INPUT STAG 


+7 s SUN 
ЗО OD OO :F4 


` 


E _ NUMBER[ 1-200 3" 

1910 CONSOLE 12,1, 31,6: INPUT "EEE" IR$ 

1920 К=ЧА (КФ) :ІЕ (R=: 201) +(R=40) THEN MUS 

IC"+C3": GOTO1900 

1930 AD-$Có600-(R-1)X*$48: CONSOLE: CLS: CURS 
ORS, 12:РКІМТЕ7, J"I ВАМ SAVING 8":R:"ROUN 
D DATA NOWG":MUSIC"R8":WOFEN"EXODUS.D" 
1940 FORI =170%47: A-PEEK3 (AD) : AD=AD+ 1 : PRI 
NT/T А: NEXT: MUSIC" «*C3": CLOSE: CURSOR15, 14 
:РКІМТІ7,1"АбАІМ Y OR N" 

1950 GETA$:IFA$-"Y"GOTO1900 

1960 IFA$-"N"GOTO190 

1970 60701950 tatus 

1980 CLS:CURSORó,12:PRINTEI7, J"INPUT STAG 

E NUMBERL 1-200 1" ; 
1990 CONSOLE 12;,1,21,6:INFPUT"GEBG" ; R$ 

2000 RsVAL(RS$):IF(IGR-2201)*(R-7Z0) THEN. MUS 
IC"«*CZ2":GO0TO1900 

2010 AD-$Có600-*(R-1)X*$48: CONSOLE: CLS: CURS 

ORS,12:PRINTEI7, "I 64M LOADING 8" iRi"ROU 

ND DATA NOWG":ROFEN"EXODUS.D" 

2020 РОКІ =170%47: INPUT/TA: POKE3 (AD) , A: AD 

-AD*1: NEXT: MUSIC"«*CZ": CLOSE: CURSOR15, 14: 

PRINTEI7, "AGAIN Y OR N" 

2030 GETA$:IFA$-"Y"GOTO1990 

2040 IFA$-"N"GOTO190 

2050 GOTO20320 

2060 РОКЕ (0), 1: РОКІ =57ТОАЅТЕР-1:РОКЕ (0), 
1, В: ОЅК Ар (1) ) : CURSORI*2,B:PRINT" BB ":M 

USIC"R1":NEXT: RETURN 

2070 POKE(0),2:FORI-ATOZ7:POKE(Q),I,B:US 

R(AD( 1 ) ) : СОКЅОКІ ~1, В:РКІМТ" BE ":MUSIC"R 
1":NEXT:RETURN 

2080 FOKE(0),3:FORI-ATOA*B:POEE(O),27,I: 

USR(AD( 1 ) ) : CURSORZ7,I-1:PRINT"  ":MUSIC" 

R1":NEXT:RETURN 

2090 TEMFO06: MUSIC"GAROG1ROG1ROGAAZGZIEBEZI-4«D 

5": CURSORS, 12: PRINTI 5, J"YOUSCLEAREDEZOOR 

ROUND" 

2100 MUSIC"G1Ri1A1RiBi1RIGiRIA1RIBIROGIROA 

1ROB1ROA1ROASROG1ROGSA1ROASGi1ROGS-«C2R2-4C 
“:50Т70620 : 


(ファ イ テ ィ ング プ ブギ ウキ ギ 前 田 優 作 ) 


F 


| リス ト 2 EXODUS マシ ン 語 リス ト 


` 


pio 


リス ト グ の EXODUS マシ ン 語 リス ト 
CA78 00 00 00 00 00 00 OO :00 


:0 
:2 
:C 
s В 
:2 


£4 O uU £o 


+7 SUM 
оо 
оо 
41 
55 
01 
оо 
оо 


5. PS. つまらない マシ ン の けなし 合い を PiO か ら 消 減る せれ ば , も う パ ー フ ェクト な 本 に な る と 思う ん で す が ? (一 番 の 汚点 は 僕 だ どっ た 


Q (O) - (O) р Nakkey さ ん 申し 訳 あ り ま せん ノ 僕 の 勝手 な 判断 で 問 違っ た こと を 勝手 に 書い て し まい まし た . 決し て その 道 に 進ま れる よう な こと を な 
QA Ол きら な いで くだ さい (?). と ころ で PARISH す ご いで すね , や っ た こと な いけ ど . P8mkII の ユー ザー の 方 々 も きっ と 感動 され た こと で し ょ 
り し て ) 


pio 


リス ト グ の EXODUS マシ ン 語 リス ト 
07 07 07 07 67 07 07 07 :98 


ж 


+7 : SUM 
71 :7В 
OO :B3 


° D O + r) D tJ N @ 


( 虹 色 の Fantastic Totiyan) 


2227950 ҰС m > EA ыр š h š TEMA he T аа D ЖЕ: 
EE аео са Lear TA Sj TEASE SE d ehe d de d. UT 52 Meo Б ГЫР, 52 
ОТТА dot Sede rong D NS Ya で こち と すさ 


eu 


リス ト 2 EXODUS マシ ン 語 リス ト | А 


> 3 月 号 p94. の 桂 本 さん , あな た も で すか / 僕 も 買っ ちゃ っ た ん で す よ . さす が に メ ゲ まし た . と ころ で ミニ PiO に マシ ン 語 の PROG. を 載 
せよ うと いう 人 が いる みた いで す が 。 BASIC で も スピ ー ド ・ ゲ ー ム は 可能 な ハズ で す 。 そ れ が テク ニッ ク で で しょう? やむなく SUB 等 で 使う 
の は と も か く , まず は 工夫 し て も らい た いと 思い ます .。 単に 遊べ る と いう だ け で な く , 工夫 の 跡 が 見 られ れ ば それ で いい と 思い ます . 初心 者 
が 投稿 し に くく な る の も 考え も の で すし …。 — (BASIC の 好き な CLYNCO) 


6 


ою 


ІЛ АК2 EXODUS マシ ン 語 リス ト 


5 Же) 
"e nct aed 


di wor. TA y js ; E i rede 2 я M RN СС ジン で DIE 4 4; лу e 
БАЭ E Б A ORW Re Ор И араны a RI es W. Een: ИРИ ET E A РИБУ M кй, u haya E p EE 
VENUE lee eec ert e stay EE SE ОДО E E GP GS T Ed DICTU EMEND ОСЫ 


“ы 
Jc 
4. 
E 
SN 
qo. 
js Jig 
r 
Pa 
d 
се” 
PEN 
"dv 
13 
* £ 
"e 
%У 
21 
4 
^ 


оо _ 


リス ト グ EXODUS マシ ン 語 リス ト 


O 4 Do Tm D +» O cc o 
UO Q tJ 4A + G D rJ O UO ¿n 


46 
95 
46 
Ав 
10 
34 
D7 


る 人 いる か な ? 


— r n rs srvF r ca r csaaÑrrasahsÑsrs 
(o) (o) を 「 う わーい , ゼ プ リス が で けた 一 」 と 喜ん で か ら 早 や 2 週間 . 毎日 の よう に 遊ん どおり, この 前 な ど は 10 時 まで . そう 7 時 か ら 10 時 ( 当 前 
Ол Ол 21: 2, 015.300pts. | 


STAGE7, РАКЅЕС 7, LEFT28 で 手首 が ( 太 ) お か し く な り , 次 の 日 医者 へ 行き まし た . この 記録 を 破れ 


+7 SUM 
оо 
оо 
ささ 
44 


(GIDDO・ SPARIO) 


алық 


Pio 


UAF2 EXODUS マシ ン 語 リス ト 


P m @ T OLO D Û FJ O 
o x b S 0 4 СУ н ロロ 


: SUM 
| 112 
| 52. 
| :33 
| :74 
| :55 
:90 
: BB 
: 89 
| 
| 
| 


:C4 
215 
: AD 
: Bó 
: CE 
: Có 
F1 
:29 


м x 7% қ ! 
yk AS x t Ж. E Ў ; y 
T. 4” E M K at : S 
фа атан Ce NIE TE UB) 
PEG аА 


К н ТУ 
e^ 


Ue NH x Лү AA 
МИЛ АҒАР С ТОКЕ: 

* 4 ші s 
Бы ДЫ uie ЫЖ 


e 2. NL 0 MI XC E Шала 


piO 


リス ト グ EXODUS マシ ン 語 リス ト 


1 台 ほ し い . 


ーー 一 
D © Q (O) P Pi0 2 月 号 の 「 走 れ ス カイ ライ ン 」 の 改造 を や っ て みた ら , スピ ー ド が 落ち た よう に 見 えた が メー ター は どん どん 上 が っ て いた . いつ の ま 
QA Ол Dl ue イン / M" だ けど や っ ぱり 音 は ター ポ 2 の 方 が ずっ と いい で すね .。 PCG ほ し いな . PSI 今年 こそ マシ ン 


O m o OO UCC о 


店 を 勉強 し ます が . どん な 本 が 一 番 い いで すか ?・ 


P.S. 3 > キー モモ 映画 化 


だ れ か 教え て くだ さい (PC-8801/8001) . ESAS 


ュ ン の 品 不足 が 続い て いま すね . 


(バイ ファ ム ) 


ーー ーーーーーーーーーーー З 


+7 SUM 


00 š 90 
оо :08 
TU р? 
11 :BO 
00 : BF 


pio 


マシ ン 語 リス ト 


+7 :8UM 
10 tE% 
11 :8С 
00 :19 
11 :FB 
OO :ED 
00 ЕЕ 
11 :СА 
00 :66 
10-:56 
O1 OA 
00 :65 


£4 
51 
22 
02 
00 
00 


:АЗ 
: AD 
:99 
:58 
:95 


:7А 


M > zv. < m » bh sie à 
k” + (+ 49-4 C+ 4X 


1999 年 6 月 6 B, 丹羽 郡上 空 に 突如 未 確 


認 飛 行 物体 が 出現 し , 攻撃 を 開始 し た . 


そこ で あな た は , シャ モエ 博士 が ひそ か 


に 開発 し た ロボ ッ ト の "RERE" に 搭乗 し , 


未確認 飛行 物体 を 掃 減 す べく 出撃 し た . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


スク ロー ル の で き は 良い の で す が 


ゲー ム と し て は いま いち . ボー ナス 
ゲー ム な ども 付け て ほし か っ た な . 
(O) 


大 そそ 大 を よそ る すそ 


7 E^ / ` TO 
| ; E ; | 
“/ N / 


ү H 


BASIC と マシ ン 語 か ら 成 っ て いま す . 


マシ ン 語 は DATA 文 や リー ド し , そし て 


メモ リ に POKE し て いま す の で ,。 DATA 
文 の 所 は 慎重 に 入力 し て くだ さき さい. 
また, RUN する 前 に テー ププ に セー ググ し 


10 GOSUR2OO00: GOTOZO 
15 FOSITIONX, YO: PATTERN-1. CHR$(O) : X-88: 
KO-O: RETURN 
19 REM BN GE SE RERE MOVE ЖИН 
x 
20 М5К(%822):КҮ-РЕЕК(%11Ғ6): INF2$EA. КО: 
IF(E222593) Ж(кКОзО) THENYO-YX8-*8: КОз1 
М5 IFEOGOSUE1950 
ІҒКҮ-2ЗЭТНЕМӘО 
Y=Y+(F.Y=239)—(KY=191) : IFYX2THENY-2 
CURSOF10O,Y1:USF(M1,CL $) 
CURSOR10. Y:LISR(M1, MECMCE) ) ) š Y1=Y : KK 
+1+(K>2)£4: IF(Y:17)+(ER=Z)THENSOQO 
65 IF(CHARACTER$ (23, У) =" в") +(CHARACTER$ 
(EJs Y+1)="0 ") THENER=ER+1 0: EN=0: GOSUB190O 
70 IFENTHENEX-zEX-1: CURSOREX «EY: USR ($889 
ЕФ) : IFEX-OTHENEX-78: EN=0: CURSORO EY: USR 
($BC4) :EY- INT(RNDC12 X15) +3 
80 ONTEGOSURZOO, 400, 500, 600, 700: ONT1GOS 
UE2OO:E1-E1-*1: IFE172150THENE 1 =0: EN= 1 
90 FU=FU+1: IFFU/L> і THENFU=0: ЕК-ЕК-1: CUR 
SORER, O: LIBR ( $BB9 . FLI$) 
95 GOSUBITO0:GOTOZ2O 
99 REM ЖЕШ: SCROL  G€—E qs qm p 
100 USR(S1) : CURSOR78. 24: FRINTMIDS$ ("Bir 
із". INTORNDC1OXZOXZ-1. 7): : SR=SR+1 
2 S THENRETURN 
110 LUSR(S2)? : CURSOR78. 21: РКІМТМІРФ ("trei 


F(ABSCOX /B- TX) %3) XCYO/BzTY*1) GOSUB15: CURS 
ОКТХ, TY: USR (М1, ВМФ) : МЈЅІС" +Е+6" : 056 (М1, С 
L$): TXzO: SC-SC«*50: CURSOR10, 1: PRINTSC 

160 FORI-OTOTS: IFEM(T) “1ОТНЕМ170 

165 IF(ABSOX/B-TXCIDO)X«SO) ЖХҮО/В-ТҮ(1941) 
ТНЕМЕМ (І) =99%9 

170 NEXT: IFX: 2В06050Е15 

180 RETURN 


MZ-2eoOQO/eoOQ-c-RAMI 


BASIC 十 (マシ ン 語 ) 


て お いた だ 方 が 良い じ と 思い ます ( 念 の なめ). 
ТАРР | 


Р A) ыты Da 。 
ФФ ` - Á だ 


自分 は "КЕКЕ" СЗ. [4| で 上 , [el で 
トド に 動き , [SPACE| で ミサ イル を 発射 し ま 
7. だ だ し , ミサ イル は 右 方 向 に 出る だ け 
で す ( 始 め は キー 操作 が 難し いか も し れ ま 
せん が , 慣れ れ ば 簡単 に 敵 を や っ つけ る こ 
と が で きま す )。 

そし て , 下 に ある 建物 (? ) に ぶつ か っ た 

チキ ショ ーー 命中 し た と 思っ た の に 


189. КЕМ Ж ЖИШШ ENERGY UF BE 25 x ж | 
=€ 

190 CURSOREX.,EY:USR($8C4):EX=78: IFER: 70 
THENER-70 

195 FORO1-ER-10TOER: CURSORO 1, O: PRINT "Bg" 
:FOKEZ8566.100-Q1:USRC3860) : NEXT: ER=ER+ 1 : 
RETURN 

199 REM ШЕШШ FIGHTER 1 "S Sm 
F: 

200 IFF1THENZSO 

205 IFTYzOTHENTYzY 

210 TXzTX-41:CURSORTX-1s.TY:USR(OM1s CL $): С 
URSORTX.TY:USR((OM1s. T1$ (O) ) z IFTX: Z7THENCUR 
БОКТХ. ТҮ: МӨК(МІ.СІ.6) eTX=0: TYzO: T1=O 

215 IF(IGABS(CIO-TXO)ZZO)*CABSCY-TYO <42) THENS 
O00 

220 IFKOXITX2112 X CRNDC12 7.8) THENCURSOFT 
Xs ТҮ: 056 (М1, BM$):F1z1:W1-zTY: W2-TY: TY-O 
230 RETURN 

290 W1-zWi-1:W2zW2-41: IF (W122)+(W21 17) THE 


NCURSORT X. W1 +1: USF (M1 » СІ Ф) : CURSORTX.W2-1 
:USR(MISCLS) :F1-0: T1 1: TY-O: TX=0: RETURN 
260 CURSORTX.W1:USR(M1. T1 $C 1) ) : CURSORTX 
:W2: USRC(OM1.T1$(2)) : RETURN 


299 REM E ЖШШЕ FIGHTER 2 š E 


zm 


200 IFEMCO)-99GOSUB15: СОКЅОКТХ (0), TY(O) 
: USR М1, ВМФ) : MUSIC"+E+G" USR(M1 。CL ま も) : TY( 
Q)-S-INTGORNDCIO X162: TXCO) ZB: EX (O) テー1 : BA 
-BAÓ*1: BMCO) =0: GOTOSS8O 

SOS DETX(O)sF=TY(O) : TXCO) - TXCOO FEX (O) : T 
YCO)ZTYCO) -FINT(RND(1)XZX-1)-(COTY((OD)ZZO (TY 
0) >16) 

310 IF((TX(O) =O)+(TX(O) 229) THENCURSORD, Е 
:USROM1«CL$): TX(CO) 28: EX (O) =ー1 

520 CURSORD;F:USRM1. CL$) : CURSORTX (0), Т 
Y(O):USR(MlsTAB(MC(E))):IF(RND(1)5%.9) ※(TX 
(O) 414) THENEX (O) テー ド X(O) 8 TFT1=OTHENT 1 =1 

S258 IF(ABSCIO-TX(CO))XZO Ж(АВЅ(Ү-ТҮ(0) ) <2 
? THENSOOO 


り 、 英 と ぶつ か っ だ り , エネ ルギー が 0 に 
な る と 1 機 減 り , 3 機 な く な る と ゲー ム ・ 
агбаи 87 ЕЙ 

書き 忘れ まし た だ が, ЬЕ U < š š+ 
LL, 当 だ っ て も エネ ルギー を 吸収 きれ 
る だ け で す ( で も 注意 し て お いた 方 が 良い 
で す よ ). £7, エネ ルギーBALL も と き 
どき 飛ん で きま す . ぶつ か れ ば 取っ た こと 
に な り 。 エネ ルギー が 増え ます . 詳し いこ 
と は 1 度 プ レイ すれ ば わか る は ず で す . 


次 きん も , まず は 1 つ ゲ ー ム を 作っ て み 
る こと と です. 時間 は か か っ て も いい で す 。 
と に か く 1 ユ 1 つ ゲー ム を 作れ ば 自信 が 付く は 
す て す 、 これ が きっ が か けた な り 。 だ が ん だ ん 
ゲー ム を 作る こつ が わか っ て きま す 。 

k3 参 考 文献 
Tong * po 
РіО, 84 年 6 H + 


^ КЕКЕ BASIC) A M к у м / UU 


2520 IFRNDC1I2z.9THENRETURN 

240 FY=INT (RND (1) ж15+1) X8:LINETX(O) X88 
STYCO) XB. 764 РҮ. TXCO) XB*B. TYCO) XB-15: MUSI 
C"+A": IFY-1zZ5FY/S8THENBLINETX(OO) X8-8. TY (O 
ө ЖВ,96.РҮ.ТХ(О) X8+B, TYGO) XB 15: RETURN 

350 MUSIC"-G1": CONSOLER:MUSIC"-4-B-4-B- 
A-BO": CONSOLEN: QO-ER: ERZER-10: IFERZXZTHEN 
ER-4 

260 FORG1-GQOTOERSTEF-1: CURSORG1, O: PRINT 
FU$:FOKE3856,.100-G1: USR ( 3860) : NEXT: RL INE 
TXXO) 6+8. TYCO) XB, 96. РҮ, TX CO) XB-B, TY (O) X 
8+15: RETURN 

380 SC=SC+100: CURSOR10,.1:FRINTSC: ТЕТКЕ В 
ATHENTE-2: БАО: J=O: TS=1: T1-1: TY(O) = さ +TNT 
(RND (1) %15) s RETURN 

590 GOTOZOS 

299 REM E dE SS N^ FIGHTER з "m 
E 

400 FORI-OTOTS: IFEM( 1 )=1OTHENNEXTIRETUR 
N 

405 IFBM(I?-z99GOSUR1S: СОКЅОКТХ (І), ТҮ(І) 
: USR (Мі, ВМФ) : MUSTC"+E+G" : ШЈЅК Мі, СФ) : TY( 
I):-Z-INTORND(120X152: TXCIO —:8: BA=BA+1 : BM( 
І) =0: 6070480 

410 TX(I)=TX(I)—1: IFTX( 1) -OTHENCURSORTX 
(IJ, TYCID :0ЅЕ (М1, СФ) :ТХОІ) 238: TYC ID? - INT 
«ЕМО(12Ж16-2) 

420 J=J+1+( J51) X3: CURSORTXCIDO, ТҮСТІ) :USR 
(Mis T$C(MCJ)2)) : IF(ABSCAO-TX(CIO)O ZO X CABS( 
Y-TYCCI2) 42) THENSOOO 

440 IFRND(1)z.9THENNEXT: RETURN 

450 РҮ-ІМТ(КМО(1)Ж1541) XB:LINETX(CIDOX&.T 
YCI)K8*8, 9G. РҮ: MUSIC" *A": IFY*1Z2FY/8THEN 
BLINETX((ID)XB.TY(I) X8*B, 96, "Y: NEXT: RETURN 

460 MUSIC"—-G1": CONSOLER: MUSIC" -4-B-Aà-B- 
A-EO": CONSOLEN: QO=ER: ER-ER- 10: IFER さ THEN 
ER-4 

470 FORG1:-GQOTOERSTEF-1: CURSORG1. O: PRINT 
FL$:FOKE3X8665. 100-01: USR (384640) : NEXT: BLINE 
TX<I) X8. TYCIO XB*B4 96, Y: NEXT: RETURN 


突然 で す が お 尽 の ニュ ー ス で す . っ て の は 冗談 で す が , 私 め July は みな みり ょ う こ 様 と つい で に 6001 の Fun Club に つい て 大 賛成 で す . 
SOLVALOU る ん お 願い で す . JR で 迎 夢 快 入 き ん が が ガンバ し て る よう に SOLVALOU き ん も 6001 を さら に 盛り あげ て < く だ さい . お 願い し まき 
T^ P.S. 嘘 の よう な 本 当 の 話 で す が 、 私 の 友人 は チェ ッ ク サ ム は 先 に 入れ る の ? 後 か ら 入 れる の 2 と 聞い た 猛者 で す . (July) 


480 SC-SC*100: CURSOR10. 1: PRINTSC: IFTK-B 
ATHEN410 

490 ЕМ(І) 10: TYCI) 219: TXCI) 212* INT(CRND( 
1) X25) : ҮА=ҮА+1: IFYA-2THENTE-3: ҮА=0: BM( 0) 
=0: BM( 1) 20: BA=O: RETURN 

495 NEXT: RETURN 

499 REM B ЖШ 
S- 

500 FORI-OTOTS: IFEMCI) = 10THENNEXT : КЕТИК 
N 

S05 IFEM(D -99G0SUR1S: CEURSHRTX(T) .TYCI?) 
:USR(GOM1, ВМФ) : MUSIC" -*E*G": ОЗЕК (M1, С.Ф) : ТҮ 
I)519: TXCI?) 212* INTCRND(C1) X25) : BA=BA+ 1: EM 
(1) -Оо:б0ОТОЗВО 

510 ТҮСІ) zTYCGI) -1: IFTYCI? =2THENCURSORTX 
(1). ТҮСІ): USR(OM1 4 СФ) : TYC I2 =18:ТХ(1) =12+ 
INT(RND(1) 425) 

520 CURSORTX(I), TY(1):USR(M1, T5$(0) ) SIF 
(ABS(10-TXCID) %2) KCABSCY-TYCIOQ) £2) THENSO 
оо 

540 IFRND1)2z.9?THENNEXT : RETURN 

550 FYTNT(RND( 1 X15*1) XB:LINETXCIO X848 
STYCI) X8, 96, РҮ: MUSIC" A": IFY*1z2FY/BTHEN 
BLINETX(I?X84*8.TYCI) XB. 96. PY: NEXT: RETURN 
560 MUSIC"-G1":CONSOLER: MUSIC"-A-E-A-E- 
A-BO": CONSOLEN: QO-ER: ЕК=ЕК- 10: ТРЕК THEN 
ER=4 

570 FORD1=QOTOERSTEF—-1:CURSQORQ1,O:PFPRINT 
FU$: POKEZS66. 100-01: USR C3860) : NEXT: BL. INE 
TX( 1)*BTB。TY( 1 ) XB. 964 РҮ: NEXT: RETURN 

580 SC-SC*100: CURSOR10. 1: PRINTSC: IFTE? E 
ATHENS10 

590 ЕМІ) 710: YA=YA+1:TX( 1) -38: ТҮСІ) =4+1 
NT(RND( 1 ) X12): IFYA-2THENTE-4: YA=O: BMCO) = 
O: EM( 1) =0: BA=0: RETURN 

$95 NEXT: M 

599 КЕМ ES: d 


FIGHTER 4 JE WEG 


FIGHTER 5 Ж ЖЕШ 


ІНЕ 

600 FORI=OTOTS: IFEM( І) =1 ОТНЕММЕХТ: RETUR 
М 

605 IFEM( 1) =996GOSUE1 5: CURSORTXCIDO4«TY(CI) 
:USR(OM1. ЕМФ) : MUSIC"+E+G" USR (М1, CL$) : TY( 
І) =4+INT(RND( 1) ¥13) : TX (1) =38: BA=BA+ 1 : ЕМ 
1) =0: GUTH6 ヨ O 

610 Р-ТХ(1):ЕҒ-ТҮ(І):ТХ(І)-ТХ(І)-1: ТҮ(1) 
=Тү(І) +КХ(1) : IFTXCI) =OTHENCURSORTX (1): TY 
(IT)kUSR(M1』CL ま ) : TYCI) =4+RND( 1%13: TX(T) = 
S8 

615 IFITYOD) TIS) *£6OTYCIDO- 
TYUD 217) X2: TY(I)8S19*CTYCIO& 
>17) 3 

620 CURSORD,F:USR(M1,CL$):CURSDRTX(I),T 
Y(I):USF(M1, T4$(O)): IF(RBS(10O-TX(1))< 2) X 
(ABS(Y=TY( 1)) 42) THENSOOQ 

640 IFRND(C1)Z.9THENNEXT : RETURN 

650 FYsINTORND(CiIO X151) X8: ІМЕТХ(І) X8*8 
STYCI) X8, 96, PY: MUSIC" 4A": IFY*1457FY/8THEN 
Б. ІМЕТХ (І) Ж8+8, ТҮ‹І) XB, Fé, РҮ: NEXT* RETURN 

580 MUSIC"-G1": CONSOLER: MUSIC"-A-B-à-B- 
^-BO": CONSOLEN: QOSER: ER-ER-10: ТРЕК THEN 
ER-4 

670 FORG1:-GOTOERSTEF-1*: CURSORQ1 „ O: PRINT 
FU$:FOKEE3Z866, 100-01: USR (2860) : NEXT: EL INE 
TX<(I)XB+8., TY(I)X*XB, 96, FY: NEXT: RETURN 

580 SC-sSC«-100: CURSOR10, 1: FPRINTSC: IFTE-B 
АТНЕМ610 

690 EM(I)=10:YA=YA+1:TX(I)=Z8:TY(I)=4+I 
NT(RND( 1) ¥13) : IFYA-2THENTE-S: YA=O: ВМ (0) = 
O: BMC 1) 50: БАО: RETURN 

695 NEXT: RETURN 

699 REM ESSEN 


„17)›ТНЕМКХ‹1)=1+( 
Sy4#16*(TY(1) 


LEVEL UP 


HP 
: MUSIC" +COC+DD+EE+FF +66+AA+BBRZ+BR+E+F +G 
*FAER*DACADACRG6RO":LzL -2: LE=LE+1: CURSORS 
541: FRINTLE: IFLSOTHENL=9 

710 CURSORZO,10:FRINTSPACE$(16): ТЕ=1: TX 


E 
700 CURSORZSO,.10:FRINT'L E V E L 


(0)=38:TY(0)=3+INT(RND(1) x14): RETURN 

4999 REM ESE ESE: БОМБЕ ENS €. 
8 

5000 ЕОКІ=0Т07: В. ІМЕВО, ҮЖВ+І, 96, Y*8+I: Е 
LINESO, ҮЖ8+15-І, 96, ҮЖ8+15-1: ВІ ІМЕВО+І, YX 
B.BO+I, ҮЖВ+15: Ві. 1МЕ96-І, ҮЖВ. 96-І, YX8*15: 
MUSIC"4"-MID$(C"BAGFEDCC",I*14.1)04"0" 

5010 NEXT: CURSOR10, Y: UISRCM1 » ЕМФ) : MUSIC" 
-С1-р0": ВКАҒНС: Х=88: К0:=0: G2G*2: FORI-ZTOi1 
В: CURSORO, I: FRINTSFPACE$ (79) : NEXT: IFG=6TH 
ENG-«O: 50Т06000 

5015 ERs71:TXz0:F1-0:E1z0:ENzO: IFG-ZTHE 
NCURSORZ8.,0: USR (М1, M$ (O) ) : GOTOSOZO 

5017 CURSORZB,O:LSR(GM1:CL.$) 

5020 CURSORZ,O0:PRINTSTRINGS:"l'". 68) : FOR 
I-OTOTS: TXC I) 38: TYCI) =4+INT(RND( 1) %14) : 
KX (1) =-1:NEXT: TUT 
050820590: GOTO2 

5999 REM Dub GAME OVER ЖЕШ 
"my 

6000 FORI-1TOB8: CURSORA41., 10: PRINTRIGHT$( 
"О УЕ R".ID?:CURSORAJO-I«. 10: PRINTMID$("G 

A M E ",1, 1) : MISIC"*"4-RIGHT$("CDEFGAEC" 
s 1)+"OQ" š NEXT 

6010 MUSIC"R+D4R1+DZ+DOR+DR+DS+F4+EOR+E 
4+DOR+D4+#C1+D+E+F+G+A+B2RC"':CURSORZ1, 13 
:PRINT"Do uou plau again ?": Аб=1: IFSC>HI 
ТНЕМНІ-5С 

6020 GOSUE100:GETA$: IFA$-"Y"GOSLUEB20470: 
5050820510: GOTO20 

6030 IFA$-"N'"THENFOKE2866, $60: POKE 3862. 
Ф200: PRINT "291": END 


is Men 52 


6040 АД 


СЕТ КЕМ BUILDING 


E 


9500 FORI=OTO78:FORJ=24TO01B+RND ( 1) Ж55ТЕ 


78: FORJ-24TO21-*RND(1)X3STEF—-1*: CURSORTI  J: 
FRINT"l"::NEXTJs I: РКІМТ "0": RETURN 


9999 REM WWE: OE DEMO 1 осна 
10000 605089500: ҒОКІ=Т012: ҒОКЈ=1Т027:С 


URSOR41, І: РКІМТКІВНТЄ(КФ 1-6). J) : CURSOR4 
1-J. І: РКІМТМІЮФ (Ф (1-6) .1,7Ј): 
0506100: МЕХТЈ, І 

10010 FORI-1TOS:FORJ-OTO1: QUT32274J*: GOS 


„О: ЕОКІ=6Тт012: CURSOR14, I: PRINTSFPFACES (54) 
-USR (M2) : GOSUE1 O00: NEXT 

10020 FORI-1TOZO: CURSOR274 10: FRINT"C H 
А К А С Т Е Е ° Sti": GOSUB100: NEXT: 0-1 

10020 MUSIC"-*CO-4D-«E": CURSOR10. 10: LISRCM1 
4,M$CO)) :РЕІМТТАВ (25) "tman un pe 
4 r—34":FRINTTAB26)$"| КЖ. l 

кз р 

10040 PRINTTAB(26)s "| г: —— ете 
トーーー "sPRINTTAB(26)š "リト ーーー ーー デブ ы レー b 
—— "SCURSORZós.10: USR(M1。M ま (GO) ) :zFORTI-1TO 
30: GOSUB18500: ІЕМТНЕМІ =0: 65071020510 

10050 К=к+1+(Е>2) ж4: CURSORZ26. 10: USR(M1 。 
МФМК) )) :CURSOR10, 10: USR ОМІ, МФМК) ) ) : 日 
OSUE1O00: NEXT: CURSORS4,S:FRINT"— É EY S 


C A N –": 60506100: CURSORSS.8 
10060 РКІМТ"- 4 — UF": GOSUE100: CURSOR 
S8,12:PRINT"- é4 — DOWN": GOSUR100: CURSOR 


54,16:РКІМТ"- SPACE 一 MISSILE": GOSUE10 
0: CURSOR29.14:PRINT"e ENERGY BALL" 
10070 FORI-1TOA40:GOSUER18500: NEXT: GOSUE 1 
9000 
10080 MUSIC" +C+D+E" : CURSOR1 O, 10: UIBRCMT » 
Т1Ф(0) ): РКІМТТАВ (265) 3 "0г——— г 1 (ene 
т ":FRINTTAB(6262 5 "| | | | 
Жарды 1 
10090 РКІМТТАВ ‹ 26) $ " — | | | 
| | "Т РКІМТТАВ (22) 5 "~ = 
エーーー "s CURSOR26, 1O:USR(M1, Т1Ф(0) ) :*FORI-1 
TO40: GOSUB18500: IFMTHENI-O:GOTO2OS10 ы 
10110 NEXT: GOSUR1 9000: MUSIC" +C+D+E" : CUR 
SOR10, 10: USR (М1, Т4% (0) ) : РКІМТТАВ (22) 5 "tr 
шкы; фа. т — = "*FRINTTAB(26);5"| 
| b. | "2021 
10120 РКІМТТАЕ (26) 5 リト ーー ブ | Jes 
—— "s PRINTTAB(26) 5 "^ “kos br fene 
% 3 "1 CURSDR26, 1O:USR(M1, Т4Ф (0) ) :РОКІ=1 
T040: GOSUE 18500: ІҒМТНЕМІ =0: 607020510 
10120 NEXT: 5050619000: MUSIC" *C*D«*E" : CUR 
SOR10, 10: 05К (М1, T2$ (0) ) :РКІМТТАВ (25) 5 "tr 
ee po rm ":PRINTTAB( Z6) § SE 
| E] | | ":0=1 

10140 РКІМТТАЕ (26) 5 "| reg | | | 
HA ":PRINTTAB (26) 5 "t—— | yt er 
s. 1 ":iCURSORZ26;10:USRIOM1s T2$(12) :FORI=1 
TO3O: GOSUE1 8500: IFMTHENI-O:GOTO2OS10 
10150 К=К+1+‹К>2) X4: CURSORZ6 10: LIBRCMI 。 
T2$(MCGOD) :CURSOR10, 10: USR(M1。 T2$ (МСК) ) ) 
: GOSUE 100: NEXT: GOSUB19?OOO 

10150 MUSIC"*C*D«*E": CURSOR10, 10: 05К (Мі, 
T3$(0)) РКІМТТАВ(26):%"%г w > саак үт» 


г" 


に سسا‎ 


«uli q 1": РКІМТТАВ (25); "| E | | 
ЖЕ. |":б= 1 

10170 PRINTTABCZG "юу r^ トーゴ ] et 
| | ":PRINTTAB(26);:" e » P кеме 


iS ":CURSORZ6s.10:USRIOM1. T3$(0) ) : FORI-1 
TQ30: GOSUB18500: IFMTHENI:O: 607020510 
10180 К=к+1+(К>0) X2: CURSORZ26, 10: LISRKCM1, 
T さ ま ( ド ) ) : CURSOR104, 10: USR (M1: T2$ (К) ) š GOSUB 
100: NEXT: GOSUB19OOO 

10190 MUSIC"-C-*D-*E": CURSOR10, 10: USRCMT « 
Т5%(0)):РКІМТТАВ(26):"%г 4. ЕСЕСІ г 
1 ғ---1":РКІМТТАВ(269: "| 1-3 | | 

t d 1":0*1 

10200 РКІМТТАВ(269:71 ER еке | | 
Pros "S PRINT TAB (26) p" -- t 
x "І CURSORZé6, 10: USR(M1: T5$(CO) ) tFORI-1 
T040: GOSUE18500: ІЕМТНЕМІ-О: 607020510 
10300 NEXT: GOSUR1 9000: GOTO10020 

18500 GETA$: ІҒАФ< > " "ТНЕММ= 1: I=0: RETURN 
18510 GOSUB10O0:M-zO: IFOTHENT-T-«*1: CURSOR7 
8. 24: PRINTMIDS."IbaMEZRMHD T 12 5: IFT^ 1 
ОТНЕМТ-О: О-О 

18520 RETURN 

18999 КЕМ : CLR жаш = 
19000 CURSOR10.10: USR (M1, CL$) : CURSOR26, 
10: USR(M1 » CL$) :FORIZOTO18: СОКВОК26, I: FRI 
NTSFACE$ (53) : GOSUB100: NEXT: RETURN 
Rich REM EN N S^ SHUEISETTEI 


20000 CONSOLECBONGNSO, 24: GRAFHI1CO!: TEM 
PO7:DIMTX 1) , TY CI) 4 MCE2 SKX CI) 。BM(1) M$ (2 
).71%(2).Т2%(2).72%(1).74%(0),Т5%(0),ЕК% 
(1) R$(6),L$(ó) 

20005 CURSORZ2,12:PRINT"Just a moment ! 
"i MUSIC" BO": POKE3863, 1: POKE3866. 3O 

20010 LIMIT$AFBO: RESTORE : FORI-OTO9B: REA 
DA: POKE44928* I1, A: NEXT: FORI-OTO19: READA: P 
OKE61440*I. A: NEXT 

20015 FORI-OTO29:READA: PFOKE61696*I. A: NE 
XT:FORI-OTO29: READA: РОКЕ21952+1, A: NEXT 

20020 FORI-OTO2:FORJ-1T064: READA: M$ (1) = 
M$ CI) *CHR$ (A) : МЕХТЈ, 1: МСО) =O: MCI) 91: MC2) 
=O: M( 3) =2: CL$-STRINGS (CHR$(0) 64) 


ш 


12,4 


EN ааа NUN 


F-1: CURSORI, J: РКІМТ "&" 5 : МЕХТЈ, IS FORI-OTO 


USR ( 3860) :6 


UB100:MUSIC"R4":GOSUB100:NEXTJ, 1: QUT9227 


20030 FORJ=1T064: READA: T1$(O) -T1$(O) «СН 


RERE BASIC リ スト 


R#(A) :NEXT 
20040 FORI-OTO2:FORJ-1TO64: READA: Т2Ф(1) 
zT2$0I)*CHR$(A) : МЕХТЈ, I 

20050 FORI-OTO1:FORJ-1TO64:READA: T3$(I) 
=TI$ (1) +СНКФ (A) : МЕХТЈ, І 

20060 FORJ-z1TO64:REAGDA: T4$ (0) =Т4%(0) “СН 
КФ(А) : NEXT 

20070 RESTOREZS120:FORII-1TO4:FORI-1TO2 
:FORJ-1TOS8: READA: ONIGOSUR20072, 20073: МЕХ 
TJ: ONIGOSUBZ2OO75, 20077: NEXTI. II: GOTO2O008 
Q 

20072 T1$(1)=T1$(1)+CHR$(A):RETURN 
20073 A$=A$+CHR$(A) : RETURN 

20075 T1$(1)-zT1$(1)*STRING$(CHR$(O)4,8): 
RETURN 

20077 T1$(02)zT1$(2)*STRINGS$(CHR$(CO) ,8) + 
АФ: A=" "RETURN 

20080 RESTOREZS400: FORI=1T064: READA: Т5% 
(0) =TS$ (0) +CHRS (A) : NEXT 

20090 FORIZOTO1:FORJ-1TO064:READA: ER$ (І) 
=ЕКФ(І) +СНКФ (А) : МЕХТЈ,. І ` 

20100 FORJ-1TO064: READA: ВМФ =ЕМФ+СНКФ (А): 
МЕХТЈ 
20400 し ま (0) = "Ш 

о буле ТТТ РЫ |. 
20410 1%(1) =" Eš S cs Porn 


"IR$(1)=" gm : 
20420 L$(2)-" Щй 

W'IRS(D =" ШЫ ЩЫ 
20430 L$(3)=" ЕЕ ШУ gc 
"“йБ%(3)-" | 24 | 289 E | " 


20440 L$(4) =" 
`&":К%®(4)=" BE 
20450 L$(5)=" 
"IRS (5) =" bk 
20460 L$(6)=" EE 
ШІК) =" ШИЕ ШЕП EEE 
20470 M1=44928:M2=61440: 1= 61952: 52-2616 
96: TX=0: X88: ER=71:EX=78: EY-RND(C1) #15+3: 
Lzi1O0: TE-1:T1-1: TS=0: SCZO: ЕМ=0:1Е=1:КОо=0: 
Ei1-O:F1-O:BA-O:FUS$-"E":E$-"Se " 

20480 TM$-STRING$(CHR$(£0),4) + "mw": РОКІ =0 
TO1: TY(T)=INT(RND( 1) *※14+4):TX(T)=SBiEX(I 
)z-1:NEXT 

20490 IFAGTHENRETURN 

20500 HI-10000:FRINT'"e":GOTO10000 

20505 REM BS S3: 4. ПОЕМО 2 A S S 2ш 
| | 

20510 GRAFHC:CURSORO, 24: FRINTSTRING$ ( "Ш 
н.79) 5 :ЕКІМТ "2": ЕОКІ=0Тт018: CURSORO, І: РКІ 
NTSFACE$ (80) : NEXT 

20515 CURSOR19.19: FRINT"r 1 ル ち ちや ちち トー 
ーー ゴ ": CURSOR10,.19:USRIOM1. M$CO) ) РБІМТ"ШЕ 

$"SSTRING$("Z".68):0-721:EK-0O 

20520 CURSORZ.1:FRINT"SCORE ="; SC: CURSO 
R26«.1:FRINT"HIGH-SCORE -":HI:CURSORSS8;1: 
FRINT"LEVEL ="; LE: CURSORO, 2: PRINTSTRING$ 
(та, 097% 

20525 CURSORZ6,O0: USR(M1 „ M$ (O) ) : CURSORB 
sOkUSR(M1 МФ (0) ) :FORI=37TO1OSTEF-1 : CURSO 
RI*1. Z:USROM1.4 CL$) :J=J+1+( J> 0) X2: CURSORI 
4S: USRIOMIS.ERS$CI)):USRCMZ) : NEXT 

20530 FOEKEZ866.5:FORI-4O0TO153: SET874 I: S 
ET88, I:FOKEZ845323,I:USR (2820) : CURSOR10.4 3: U 
SR(M1.ER$(J)):J=J+1+(J>O)X2:NEXT 

20540 РОКЕ2862.5:ҒОКІ-2Т070: CURSORI, O: PF 
RINT"B":FOKEZ866. 75-I: USBRCSBAO) : MUSIC "RO 
"sNEXT 

20550 FORI-19TO10STEF-1:kzkE*1*O0:71)X*3:C 
URSOR 10。 1: USR(M1, CL$) : CURSOR104, I-1: USR (M 
1 。、M ま (M(E) ) ) 1 J-J41* 6770) X2: CURSOR10, 3: USR 
(M1 。ER ま (J) ) : MUSIC"R1": NEXT 

20560 FORI-72TOA4OSTEF-1: RESET874 І: RESET 
88. I: GOSUB100: К=кК+1+ (K> 2) X4: CURSOR10.« 9: U 
SRIOM1.M$OMCE) ) ) 2J—J1-(J720) X2: CURSOR10, 3 
:USRIOM1.ERS$(GI)): GOSUB100: NEXT . 

20570 ЕОКІ=10Т015ТЕР- 1 : 0506100: К=К+1+ ( 
FE 2) ж4: СОКЅОКІ, 3: ОК (Мі, CL$): JzJ*1*(J70) 
X2: CURSORI-1.2:USRIGM14 ER$CJ) ) :CURSOR10, 9 
: USR (M1 Mê CM COO : GOSUB100: NEXT 

20580 CURSORO, 3: USR(M1, CL$) : TE210* INT(R 
ND (1) Ж=Ж Е) Ñ 

20590 CURSOR19.12:PRINT"READY !":Yz9:Y1 
=Y: MUSIC"+C1RCRCR+DRDRDR+ERERER+FF+EE+DD 
*CCRO": CURSUR 1 。 Азат т Арда 

22999 REM B dE ЖЕН КІКАІСО DATA S Ғ 


24000 DATA219, 232, 203,255, 203, 183,211,2 
224.2134 2375.79, 20941754 4417; To 223.128. 1 
89, 25. 16» 253. 203. 52». 203, 55, 9, 209 
24010 DATA229.6416,2641194.19.21 
O, 25, 209, 16, 245,225, 35 

24020 DATAZ29, ё, 16s26,119,19,213,17,80, 
0. 25, 209, 16, 245, 225, さら 

24030 рАТА229.6.106.26.119.19.212.17.80. 
0. 25., 209, 16, 245, 225, さら 

24040 rabirado ұр А A eot pbi apice 
0. 25, 209, 16,245,225 

24050 DATA219, 232, 203, 247. 211. 232. 201 
24200 рАТАаёт, в. 50, 25,15,62, 40. S50, 26,15, 
61, 245, 205, 20, 15.241, 194, 7,240,201 x 
24300 DATA219, 222, 203, 255, 203. 247,211,2 
22.,175,33,241,212.174. 240.213,64 24 197.1. 7 
9. 0,237, 176, 1B, 19, 35, 193 s 16,244,201 
24310 DATA219, 232, 203, 255, 203, 247, 2 11,2 
52.175.25.225.214.17.224,214.6.2.197,1.7 
:9,0,217,175,18,19,25,192,16,244,201 
24999 REM M Wd €; S. S5 GARE DATAS EE 
а ши 


3.17480. 


gu 


RERE BASIC リ スト 


25220 DBTA255 7251 7247251, 25*5 1.1» 152121 
1 。 1 。 1 。 1 。 1 。 255 

25220 рАТАО.127.255.127.0,0.0.0.0.0.0.0 
з О О. О. О 

25240 ОАТАО, O: O, Os Os O, O, On O, O: O, O, 170.8 
9317040 

25250 DAT485.128.128.128.128.128.128.12 
8.128.128.128,85.170.212.170.85 

25260 БрАТА255,1.1.1.1.1.1.,1.1.1.1.253,2 
51.247.251.253 

25270 рАТАоО.0.0,.0.0.0.0.0,0.0,0.0.127.2 
55.127.0 


25275 REM ЕЕ 


25000 БАТАО.0.0.0.0.192,112.18ВВ.60,252, 
128,64, 160,80, 158.0 

25010 DATRO O, BO, 16,85, 170. 85. 170. B5. 16 
9,94,143, 30,125. 250,0 

25020 рАТАО, O, 245,6, 245, 250, 245, 250, 245 
|, 250, 245, 122, 53, 128,64,160 

25050 DATA0,0,2,2.15,31,59.119.251,.245, 
233, 244, 15, 62,253,250 

25040 DATA0,0,04,0,0,192.112.188. 60. 252, 
128, 64, 160, 80, 168,0 

25050 DATAO,. 0,80, 16,85, 170,85, 170,85,16 
9,94,143, SO, 125, 250,0 

25060 рАТАо, о, 245, 48, 245, 250,245, 250, 24 


25430 рАТАО.0.0.0,0.2,7.15,0,0.0.0 (O00, 
о, о 

25455 REM E GE SS € 4. ENERGY BASE DATA” 
29440 DATA254, 3, 0,252, 2,123,11,123,11,1 
23, 3, 255, 252, 86, 255, 0 

25450 БАТА255,192.128,127.121.127,195,1 
51.225,112,185.115.227.199,142.04 

25460 ПАТА255.2.1.254,192.254,195,192.1 
55.142.157,206.199,227,241.2 

25470 БрАТА127.128,0.62.64.222.210.222,2 
02,210, 192: 255, 63., 106,255,0 


25480 DATA128,192,0,252.24.1272.,11. 123, 11 


SSES: FIGHTER 2 DATA^S 


5.250, 245, 122,53, 128, 64, 160 E ш с | v s123, 3,255, 252, 86, 255, 0 
25070 БАТА0,0.2,52,15,21.59,119,251.245, 25280 ПАТА170, В5, 170,85, 170,85, 170,85, 1 25490 рАТА255, 192,128, 127,151,127.195,1 


^ ^ w ^ қ m = 
70. 85. 170, 85, 1 70. 85, 170. 85 
М me А 4 4 Е oe е5 
25290 DATA255, 255, 255, 255, 255, 255, 255, 2 
っ lo ec кр "укр HRE 
55, 255» 255» 2595, 255, 255» 2595 Pw mL Z... 


25500 DAT40.,04,0,04,0,0,0,04,04,0,04.,0,0,0,0 


255.244,15.62.252.250 

25080 DATAOs,O, Os O: O, 152,112, 188. 6O, 2S2, 
128,64, 160,80, 158,0 

25090 DATAO, O, BO, 208,85, 170,85,170, 85,1 


51.225.112.185.115.227.199,142.064 

25500 рПАТА255.5,1.254.193,.254,.195,192,1 
35, 142, 157, 206, 199, 227, 241,2 

25510 рАТА1, 3,0,63,64, 222,210, 222,207, 2 


69,94,1435, 10, 125.250, 0 „© nte s Le 10,192, 255, 63, 106, 255.0 
25100 DATAO, О, 245, 0,245, 250, 245, 250, 245 29310 DATA0,04,0,04,0,0,0,04,0.,0,0,04,0,0,0 25515 REM EEE: EOME DATA: S E I | 
s 250, 245,122, 53, 128, 64, 160 : dis s 


29320 ГАТАО.0О.170.85,170.85,170.85,170, 
85.170.85,170.85.0,0 

29330 рАТАО.0,255.255.255,255,255.255.2 
55, 255, 2995. 299. 255, 255,0, 0 

29340 рАТАО. O, Os Os O, Os O: Os O, O: O, O: O, O, O0 
40 ) 

25550 DATAO;0;0,0,0,0,0;0,0,0,0,; 010,0, 0 
‚© 

25355 КЕМ ES: 
p: ux x x: xr] 
29360 рАТАО» 0,0,0, 192,240,252, 255,172,1 
12,192, 0, 0,0,0,0 

25370 DATA1?2, 240, 252, 255.255, 255, 255, 2 
55з170.85.170.87,172,112.192.0 

25380 рАТАЗ.14.55.254.Б5.170.В5,255.1.1 
s 1, 193,49,13, 3,0 

25590 ОАТАО, 0,0,0,3, 14,53, 255. 48. 12. 3. 0 
030,40, Ó 

25595 REM BENE S 4S €. FIGHTER 5 DATA 75 
Uma. шош 

25400 РАТАО, O, O, O, Os, 64, 160, BOs O, Os O, O, O 
000 

25410 БрАТА128.176.172.84.128.В5.170.85, 
0,;0,0,0,0,0,0,0 

25420 DATAl 15,63, 63, 1; 255,255, 255,0, O, 


Q4 O O, O, O; O 


25110 DATA0.0,3,53.154.214.,59,119.251,245, 
233, 244, 15, 62, 253, 250 


25115 REM ESSES FIGHTER 1 DATA’S 


25520 рАТАО.6»24.96.12В.0.0.255,0.0.128 
96.24,6.0.0 

25550 DATA128.128,128,128.,14.0.128.192,1 
28.0.1.128,128.128.128.0 

25540 DATA0.0,0.0.192,0,0,129,0.,0,192,0 

3040,0,0 
25550 DATA0.48.12,3,0,0,0,127,0.,0,0, 3,1 

2.48.0.0 
60400 L$(O)z" ЕС” 

—"$R$(Q)x" 
60410 1901) =" EM: NA^ 777 
Me NE Y SE 
60420 L$(2)-" BN 
"SR$(2)-" BE 
60430 L$((3)z" 
":Б%(5)=" Bae 
60440 L$(4)} =" 
"IR$(4)=" BE 
60450 L$(5)=" Eä 

"ЄК%(5)=" Bë JE 

60460 L$(6)-" gg: 

"КФ (2) =" ii 


25120 DATA1 2,5,138, 197,234,86, 108,842, 1 
22,238, 207,142,15, 6。 1 

25130 DATA132,78, 187, 117,234,223,112,53 
s93, 112, 127,191,255, 255,206,194 

25140 DATAZ, 21, 170.85, 255, 255,0.0,0,0,8 
5,170, 255, 255, 31,232 

25150 DATAO, 0,0,5. 635, 255,0.0,.0,0.85, 42. 
7.0.0.0 
25155 КЕМ 


SE: FIGHTER 4 DATA S 


= FIGHTER 2 DATA “5 


25160 DATA0.0.0.0,0.,0,04,170,85,170,0.0, 
0.0.0.0 

25170 рАТАВ5.128.128.128.128,128.05.170 
з215,170.85.128.128.128.128.85 

29180 DATA2585,1,1,1,1,1,253,251,247,251 
з225,1,1.1.1.255 

25190 рАТАО, О.О,О, О; О,О,127,255.127,0,0 
` о, Cy Q, [4] 

25200 рАТАО,170.85,170.0.0.0.0.0.0.0.0. 
Q40,0,0 

25210 БрАТАВ5,170,212,170.85.128.128.128 
s 128,128, 128,128, 128,128, 128,85 


E 


PC-CLOCK 


PiO 2 月 号 の こめ ん な さい 


GO UP A LADDER 


P.145 


図 3 に お いて バグ が あり まし た . 


P.160 
リス ト 中 に お いて 10 行 が か すれ て し まい . 
ЖЕК, 109 行 は 以下 の と ね おり で す . 


SHARP POCKET SHARP POCKET 


10 FOR I-1 TO 6:T$ (D 


Doe c E بټ‎ 
スペ ー ス 7 18 


( 単 三 電 池 4 本 ) 


PO 3 月 号 の ご めん な さい 


BREAK MAN 


ШИЕ GOLD CROSSS 変更 リス ト um 


1470 IF 0-295 AND V-279 THEN C$-ME$(5) E 
LSE IF 0-414 AND V-173 AND 11-2 THEN GOS 
UB 570:ІҒ А=1 THEN C$-P$(1):GOSUB “430 
1560 GOSUB 700:ІҒ 0-570 AND V-296 THEN б 
OSUB 570:ІҒ 4-1 THEN B=5B5: BODSUB S80: IF 
A=1 THEN L1=1:C$=P$ (1) +ME$ (4) : GBDSUB 670 
1980 IF М=@ THEN PRINT P$(0):GOTO 1950 E 
LSE LOCATE 29,2:PRINT "e":GOSUB 6 さ の 』FDR 
I-0 TO 5000: NEXT:LDCQTE 25,12:PRINT C$(1 
V: LOCATE 29,12:PRINT "e":GOSUB 6 さ の ょ FOR I 
= の TO 5000:МЕХТ | 

2000 FOR І-0 TO 20:80UND &H33, 2: SOUND &H 
50,10:МЕХТ I:CLS:GOTO 180 

2720 DATA 5,16,10,61,53,5,17,11,60,52,6, 
17,20,60,28,8,3,35,2,47,10,4,9,4,20,4,5, 
21,4,29,4,2,9,6,18,6,1,19,6,23,6,7,24,6, 
29,6,5,9,8,13,8,7,14,8,16,8,5,17,8,22,8, 
1,23,8,24,8,4,25,8,25,8,2,26,8,29,8,1,9, 
10,16,10,5,17,10,20,10,4,27,10,29,10,1,9 
,11,16,11 

2750 DATA 5,17,11,26,11,4,27,11,29,11,1, 
9,12,16,12,5,17,12,25,12,4,27,12,29,12,8 
;7,0,60,11,60,9,15,54,7,11,0,11,50,7,20, 
0,20,7,7,62,43,71,43,7,95,42,99,43,9,1,9 
,75,7,90,0,99,45,6,18,56,59,56,6,16,10,2 
0,8,9,61,8,9,61,9 

2740 DATA 8,8,8,57,5,6,88 


PIO 4 月 号 の ご の ん な さい 


郵便 屋 さ ん ムク 


P.96 
リス ト 1 に お いて 文字 抜け が あり まし た . 
1980, 1970 衝 を 次 の よう に し て て だ さい 、。 
1950 ~ “[ $ | DOWN" 
1970 一 [ә | RIGHT" 


GOLD CROSS 


P.84 

リス ト 中 印刷 の か けた 部 分 が あり まし た . 

$78D5 一 $78DA は 次 の よう に 入力 し て くだ 
4%». 

80 00 00 00 80.01 


(9-м 


RE 


ә, 


Ha" P.124 
リス ト 中 に バグ が あり まし だ た だ. 1470, 15 
60, 1980, 2000, 2720, 2730, 2740 行 を 右 
aO UZXEbE3 b: А 0) ій, 3000, 31 
00 行 を 削除 し て くだ さき さい. 


“ 


る だ ろう が , ЖЯМЕЛЗАЛАУШФШЕ55-5%ААУЫ5. 私 の 持つ 「6802」 の 資料 な ん て . 今 は ビ き JPC( 知 っ て いる 人 いる だ ろう か ) 


° (O) ° (O) を どこ か で 「6502 は 資料 が 少な い 」 と わめい て いた 和信 が いた が , それ 以上 に 「6802」 は 少な いよ うか な 気 が する . 住む 所 が 田舎 と いう こと も あ 
` “ 
e 25 の 会 報 ど け . 空しい . P.S: JUFC 長 く 続 け て くだ さい (会 員 に も な らん で よう 言う /). š (及川 弘幸 ) 
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チッ プ ・ チ ャ ッ プ の 家 に 突如 と し て 現われ 
た の は , 狂 暴 な 2 匹 の モン スタ ー の トム ・ 
クロ ー ル だ っ た . た だ こい つ は 赤外線 ラン 
プ に は 弱い . し か し , チッ プ ・ チ ャ ッ プ も 
どの ラン プ が 赤外線 ラン プ だ っ た か 思い 出 
せな い . 

「 え えい / ノ こう な っ た ら 片 っ 端 か ら ラ ンプ 
を つけ て いっ て や る ぞ 」 

と 意気 込む チッ プ ・ チ ャ ッ プ で し た が …- 
一 プロ グラ ム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 3000--3290 


кү 


m 
P の 
画面 が ちょ っ と さび し いね . 1 つの 
階 に 部 屋 が いく つか あっ た 方 が 面白 
く な る と 思い ます . (V) 


[uc E PLE E асаа 


г. АЮ і 


Бы. Med aliti o o daa РОН ЕСУ 


まず BASIC を 入力 し て セー プ し と , 次 に 
マシ ン 語 を PiO'85 年 3 月 号 の 迎 夢 快 人 る 
ん の モニ タ な ど で 入 力 し て AASAVE"AA. 
DATA", $3000, $329O と し て BASIC 部 
の 後に モ セー ブ し て くだ る さい . 


走ら せる と き に は , BASIC 部 を ロー ド 
図 1 キャ ラク タ 


ша 9-7: 


別 の ワー プ ・ フ ロア に 当たる 


し て RUN す れ ば , 自動 的 に マシ ン 語 を ロー 
FLUTA =E T. 
Ea | — 


家 の 中 に ある 10 個 の ラン プ の 中 か ら 赤 外 


線 ラ ング を 見 つけ て つけ れ ば いい の で す DT, 


ラン プ を つけ る に は 横 の 壁 を 押 き る な けれ ば 
な り ま せん . 

移動 は [AlIZ| 1[・| で 上 下 左右 に 移動 し 
iT. だ だ し 。 上下 の 移 動 は ワー プ ・ ジ ラロ 
ア の 上 で な いと で きま せん ( 図 2). それ 
に ワー し だ い 所 に な に か いる と きも ワー 
ププ できません. これ は 敵 も 同じ て す 。 

と た し て ラン プ に つい ド と ん を ああ な xx 
は 次 の 3 種類 が あり ます . 
普通 の ラン プ : スコ ア が 10 点 プラ ス 
て マジック ・ ラ ンプ : 敵 の 進行 1 方向 が 逆転 
45. まだ , 赤外線 ラン プ の 場所 を 知ら せ 
る (だ だ し と ど と ちら か うつ の だ けち 
@ 赤 外線 ラン プ : つけ る と クリ ア . その 時 
に つい て いる ラン プ グ の 数 ( メ X10) が ボー ナス 
ES. 

以上 の 説明 で は よく わか ら な いと 思い ま 
Т», や っ て いく うち に は 敵 を まい たり, 
Cr か か で АУН СУР СЕС 
る よう i 


m2 ウー ズ 


JZZZA ILI 
а ЯС JL 


ワー ププ できない 


フロ ア の 動き 


Жы = 
端 ま で くる と 


コー Y ج‎ 
A N CZA 
LA lZAL. 


進行 方 向 へ 進む 


逆 へ 進む 


9062 く 9 
999 も 6 
kj 
:лллллллла 
% 


ж 
$ 
2 


4 di wh wb de ЖЕ se 
ды 3 % D 


р 


7 ログ ラム に つ し ҮС: 


BASIC 部 が や だ ら 6 長い の で デバ ッ グ が 
大 変 で し ょ う . まあ , 頑張 っ て くだ きい 。 
マシ ン 語 で は BASIC で 使っ て いる 変数 
を デー タ と し て よく 利用 し て いま す . これ 
に つい て ちょ っ と 説明 し ます . 
JR-100C iX, 変数 人 一 Z は $82 番 地 — $B5 
番地 に 2 バイト ずつ 順に 格納 され て いま す . 
その ため マシ ン 語 で も 簡単 に いじ れる の で 
表 1 アド レス ・ マ ッ プ 


キャ ラク タ 表 示 

部 分 スク ロー ル (DEMO) 
ワー プ ・ フ ロア 移動 
チッ プ ・ チ ャ ッ プ 移動 
キャ ラク タ 消 去 

кіз 

キャ ラク タ 定 義 

キャ ラク タ ・ デ ー タ 


キャ ラク タ 転 送 用 /PICK 
キャ ラク タ 転 送 用 
マシ ン 語 デー タ 

エネ ルギー 

ハイ ・ ス コア 

2237 

FOR-—NEXT 

USR 

チッ プ ・ チ ャ ッ プ の アド レス 
トム ・ ク ロー ル の アド レス 
ON B GOTO 代 用 

ON C GOTO 代 用 
ラン プ ・ ア ドレ ス 
赤外線 ラン プ 
マジ ッ ク ・ ラ ンプ 

トム ・ ク ロー ル 進 行方 向 
チッ プ ・ チ ャ ッ プ の 残り 


133 


PIO 


BASIC 二 マシ ン 語 の ゲー ム に は 便利 で す . 
し か も ダイ レク ト ・ モ ー ド が 使え る の で プ 
ログ ラム が 短く で きま す . 

ミュ ー ジ ッ ク は 各自 で なん と か し た 方 が 
いい と 思い ます (ドー セ ャ 私 は オン チミ さき ノ ). 
反省 点 は だ たく る ん あり ます が , 割 と 気 に 入 
っ て お り ま す ( 出 来 の 悪い 子 程 か わい い ?). 


[ 最後 Ë" ] 1) "マシ ン 語 徹底 研究 ", 工学 社 
[ ы ] 2) T.S: "マシン 語 を 少し 知っ て 見 ょ 


期末 も 終わ っ て や っ と 一 息 つ い だ と こ で 
3. 冬休み 中 に は 1 本 作り だ た いと 思っ て い 
ат», な に し みろ 私 は カメ で し て …。 


7 1) Д | 1 CHIP CHAP BASIC リ スト  )ү)|) )(  () Ң а 


REM #HHHHHHHHHHHHHHHHHHH 
20 REM & CHIP CHAF = 
50 REM # ML($:000-$:290) в 
40 REM % BY MUSHI # 
50 REM #HHHHHHHHHHHHHHHHHHH 
60 POKE18,$2F:POKE19,$FF 
70 IFFEEK($217C) -$DCGOTO110 

80 PRINT 'MLOAD"M. DATA" ' : MLOAD"M. DATA" 

90 А%5191:В-%С000: U-USR ($317D) 

100 REM eee CHIF CHAF @ の の の の の の の の 

110 OFTIONCMODE1:CLS:H-7Q 

120 DIML (10) ,F (4) 。G(6) 。Y(2) ,Z(2) 

130 FORI-1TO6:READE:G(I)-K:NEXTI 

140 DATA 210,500,540,310, 340, 860 

150 FORI=1TO4:READK:F (1) =K: NEXT I 

160 DATA 260,710,560,860 

170 GOSUB1750. 

180 GOSUB1140: GOSUE1 420 

190 FICKA:U-USR($309A) 

202 GOUTOG (В) 

210 РОКЕ 1,50: BEEF1:POKE1,70: BEEF1 

220 ҒОКІ-1Т02:Ү-Ү(1І):7-7(1) 

230 PO-X/32-Y/32:P-8GN(FQ) 

240 U=USR ($3117) 

250 GOTOF (C) 

260 Y(I)zY:Z(I) =7:МЕХТІ 

270 E-E-1:IFE-O0GOTO 855 

280 1 ОСАТЕ12,25+ (Е< 100) + (EZ10) : PRINTFLD( 
‚ 1)$Е 

290 6070190 

500 КЕМ eee WARP-UF の の の の の の の の の ひ の の の 

310 IF (PEEK (Х-Ф5Ғ) < >%40) “(РЕЕК(Х-%5Е)<>% 
40) 6010240 

520 X1zX:X-X-$80 

550 GOSUB4QQ 

540 B-1:GOTO220 

550 КЕМ еее WARF-DOWN の の の の の の の の の 

560 IF (PEEK (Х+%81) < 5%40) + (РЕЕК (X*$82) < >$ 
40) 6070540 

570 X1-2X:X-X«$80 

380 GOTO:;30 

590 REM eee WARP-SUE の の の の の の の の の の 

400 U=USR (まさ の の の 。 X 1 。 生日 じ ) 

410 FORI-$CQ7ETOSCOGESTEF-$10 . 

420 FORJ-ITOI-6STEP-2:POKEJ 。 の : POKEJ-8,0: 
NEXTJ:NEXTI 

450 U-USR($310C,X1):U-USR($3000,X,*$8C) 
440 FORI-$CO5O0TO$CO7O0STEF$10 

450 FORJ-ITOI-«6STEP2:POKEJ , PEEK (J-$6Q) 
460 POKEJ*8,PEEK(J-$58) :NEXTJ: NEXTI 

470 FOKE1,250: BEEP1:POKE1,20: BEEP1: U-USR 
(%5000,Х,%80) 

480 ВЕЕР0 :КЕТ 

490 REM eee L.LUM" の の の の の の の の の の の の 
500 Р=Х-Ф1Ғ: ІҒРЕЕК (FP) $89GOTO520 

510 B-1:GOTO220 

520 GOTOS809 

550 GOTO510@ 

540 REM eee R.LUM" の の の の の の の の の の の の 
550 PzX-$1E: IFPEEK (P) -$89G0TO520 

560 GOTOS10 

570 REM eee LIGHT SUP の の の の の の の の 

580 РОКЕР,%ВА:РОКЕ1,90: BEEF 

590 FORJ-1TO10:J1-2J 

900 IFP-L (J) THENJ=1 の 

610 NEXTJ 

620 IFJ1-L1GOTO1040 

650 IFJ1-L2GOSUBR 920 

640 81-1:GOSUB1000 

650 65070510 

660 КЕМ eee TC.WARF-UPF の の の の の の の の 

670 IF(PEEK(Y-$5F)z2$40) + (PEEK: (Y-$5E) < >$ 
40) 6010700 

680 C-1:Y1-zY: Y-Y-$80 

690 60506720 

700 GOTO260 

710 REM eee TC.WARF-DOWN eeeeee 

720 IF(PEEKCY*$81) < 5%40) + (PEEK (Y+$82) < >$ 
40) 6070700 

730 C-1:Y1-Y:Y-Y«$80 

740 GOTO690 

750 REM eee TC.WARF-SUE の の の の の の の 

760 U-USR(($:z000,Y1,$94) 

770 FORJ-$COEETOSCODESTEF-$10 

780 FORK-JTOJ-6STEFP-2:FPOKEK 。 の: FOKEK-8 。 0: 


NEXTK: NEXTJ 
790 U-USR($210C,Y1) :U-USR (まさ の の 。 Y , $90) 
800 FORJ-$CODOTOSCOEOSTEP$10 

810 FORK-JTOJ«6STEP2:POKEK , PEEK (K.-$BQ) 
820 РОКЁК +В ,РЕЕК (ドー ま 人 AB ) : NEXTK: NEXTJ 

850 POKE1,250:BEEP1:POKE1,20: BEEF 1 : U=USR 
(%2000,Ү,%84) 

840 BEEP の :RET 

850 REM eee DEATH の の の の の の の の の の の の の 
855 LOCATE10,7:PRINT"NO ENERGY!" 

860 し さ =L マ ミー1 

865 U=USR ($3000, X, ま BC ) 

870 U=USR (まさ 1 の C 。 和 まじ 2FB+ し さ w2 , $40) 

880 MO-1990:M-12:G08UB1260 

890 IFLZ-060T01:10 

900 GOTO! 1 の の 


Ф:ЕФ:СНКФ (19) ; 
1470 FRINT"HI-SC ";D$;FLD (1) ; "000000"; F 
LD(@);" ";р%;Е%; 

1480 PRINT"SCORE ":0%; Рр (1) 』 "000000"; F 
LD(Q);" "%0%;Е6; 

1490 FRINT"ENERGY ";D$;FLD (1); "200"; FLD ‹ 
0) з" "3р%;Е6; 

1500 PRINT"LEFT "£DOsFLDODgG " LEED 
Ф: CHR$(19); "#"#"# 

1510 LOCATE20,24: PRINT" ————";С$%;" 
—"sFLD(1);"»7?10Q"; 

1520 PRINT"-4"$5C$;" CC "s 

1530 605081020 


1540 LOCATEO,2:PRINT" w 
таманы» . 
BEEN S e a 


910 REM eee MAGIC LIGHT の の の の の ь” 
920 IFRND (2) GOTO 960 BEEN od DSE ARES 
950 FORI=1TO2:IFZ (І) =1 Z (1) =0: GOTO 950 aM." 


940 7(1)=1 

950 МЕХТІ: ВЕЕР: КЕТ 

960 FORI-1TO15: ВЕЕР1 

970 POKEL (L1) , $8A: POKEL (L1) , $89 
980 BEEPO:NEXTI 

990 BEEP:RET 

1000 S=S+S1 

1010 LOCATE? 。25+ (8:10000) + (5< 1200) + (5< 10 
Q) + (8:10) :PRINTFLD (1) :5: RET 

1020 LOCATE6, 25+ (H< 1 の の の の ) + (H< 1200) + (H< 10 
の )+(HS 1 の ) 

1050 PRINTFLD(1 ) 』 Hs КЕТ 

1040 REM eee ROUND CLEAR @ の の の の の の 

1050 LOCATE10,9:PRINT"CLEAR'! " 
FORI-1TO2:U-USR (まさ の の の , Y (І) , $95) : МЕХ 


1570 FORI-1TO22:F$-F$«"(":NEXTI 

1580 FORI-6TO22STEFA:LOCATEI,1:PRINTFLD( 
1) sF$1NEXTI 

1590 FORI-ZTO22:LOCATEI,QO:PRINTFLD(1)5"( 
"SLOCATEI,2z 

1600 PRINTFLD(1);"(":NEXTI 

1610 FORI-OTOA4:R-$C161-I*$80:L (I+1)=R:FO 
KER,$89:NEXTI 

1620 FORI-QTO4:R-$C176*I*$80: L (1+6) =R: PO 
KER , $89: NEXTI 

1630 FORI=ØT04:0=$C1C1+I*$80+RND (9) :U=US 
К(6501Е,0,%8Вв00) 

1640 POKE$ZB14-1*2,0/256-1:POKE$ZB154IX*2 
‚9: МЕХТІ 

1650 FORI= の TO4: D= 和 まじ 1CC+ Tx ま の +RND (9) : U-US 
R(GSSO1E,Q0,$8B00) : 

1660 POKE$ZBIE*I*2,0/256-1:POKE$ZBIF-*I$*2 
,G:NEXTI 

1670 U=USR ($3000, X , $80) : ВЕЕР 

1680 FORI=1TO2: U=USR ($3000, Y (1) , $84) 
1690 FORI=1TO2: U=USR ($3000, Y (1) , $84) : МЕХ 
т 

1700 MO-1950:M-29:GOSUB1260 

1710 POKE1,180:FORI-1TO100 

1720 ВЕЕР1:МЕХТ:ВЕЕР0 

1720 RET 

1740 КЕМ eee DEMO の の の の の の の の の の の の の 


1750 LOCATE2,0 


MO= 2000: М=27 : Б050В 1 260: РОКЕ і , 200 
1070 РОКІ=1Т010: ІҒРЕЕК (1 (1) ) = 日 S1=1: 6O 
5081000: BEEF 

1080 POKEL(I),$89:NEXTI 

1092 51=10: GUSUB 1 の の の 

1102 ҒОКІ-1701500:МЕХТІ 

1110 POKE1,40:U-USR($310C 。 X ) : ВЕЕР 
FORI-z1TO2:U-USR ($310C , Y (1) ) : BEEP: NE 


605081935: GOSUR1 120: GOSUB1540: GOTO1 


REM eee INISHARIZE eeeeeee 
1150 S-0:L2-2 

1160 D-18:W-1:E-300 

X=$C28A: B1: Y (1) 2$C192: Y (2) 2$C2821C 


1770 PRINT" 


ы шы" 
FORI-1TO2:Z(I) =RND (2) s NEXT 1780 PRINT" Ls A шені жалғы жазаға sss 
1190 ҒОКІ-%5В00Т70%3В125ТЕР? = = шш 


1200 РОКЕІ 。RND(2) : NEXT 

1210 C$="":;:F$="" 

1220 L1=RND (10) +1 

1230 L2=RND (10) +1: IFL2=L16OTO1230 
1240 RET 


1790 PRINTTAB(24) 』FLD(1) ; "1984" 

1800 LOCATE 8,11:PRINT".... CHIP CHAP" 
1810 LOCATE11,11:PRINT".... TOM CRAWL" 
1820 PRINT:FPRINT 

1850 РКІМТТАВ(9); "CAJ .... UP" 


1250 REM eee MUSIC の の の の の の の の の の の の 1840 РКІМТТАВ (9); "CZJ .... DOWN" 
1260 RESTOREMO 1850 PRINTTAB(9);"L,3 .... LEFT" 
1270 FORI=1 ТОМ: READK: POKE 1 , K# 10+460 1860 FRINTTAB(9);"C.1 .... RIGHT" 


1280 BEEP1:FORJ-1TO60:NEXT 

1290 POKE1,100: BEEF: NEXT 

1300 RET 

1310 REM eee GAME OVER @ の の の の の の の の 

1520 MO-19790:M-25:G0SUB1260 

1550 LOCATE 9,3:PRINT " —ÀÁyƏw——əə.< —— v> ə——N.p, 


1870 U=USR ($3000, $C1E7 , $80) 

1880 U-USR($3000,$C247,$84) 

1890 FORI-$C380TOS$CZDF:POKEI,$4C:NEXT . 
1900 LOCATE21,S5:PRINT" PUSH [S1 K E Y 


1910 U-USR($100C):PICKK:POKE1,250:BEEF1 
1920 IFK-8ZTHENBEEFQ:CLS:RET 

1950 POKE1,80:BEEP:GOTO1910 

1925 LOCATE12,25:PRINTFLD(1); "200": RET 
1940 REM eee MUSIC DATA の の の の の の の 
1950 DATA 10,11,11,10,8,9,9,8,14,12,12,1 
3,12,12,12,0 

1960 DATA 15,12,15,0,10,10,10,0,12,12,11 
12,1% 

1970 DATA 8,8,9,10,8,0,10,10,11,12,12,10 
:12,0,12,12,0 

1980 DATA 15,14,15,12,11,10,9,8 

1990 DATA 15,14,15,14,15,14,15,0,10,10,1 
0,11,9 

2000 DATA 8,8,10,9,8,10,0,8,8,10,9,8,10, 
о 

2010 DATA 11,10,9,0,7,8,9,0,12,12,12,12, 
8 


GAME OVER 


1240 (ОСАТЕ10,2:РБІМТ "| 


(ОСАТЕ11,5:РКІМТ " |PLAY AGAIN (Y/N 


LOCATE12,3: PRINT "ーー 


IFH<S Н=5: 605081020 
1380 PICKK: IFK=78THENCLS: END 

1390 IFK-89THENCLS: GOTO180Q 

1400 GOTO1 380 

1410 END 

1420 REM eee FIELD の の の の の の の の の の の の 
1430 FORI-1TOB:C$-C$«CHR$ (20) : NEXT 

1440 E$=CHR$ (17): C$=C$+E$: D$=C$+CHR$ (19) 
1450 LOCATEO,24:PRINT" "C$; p 
CHIP——4"1C$; 

1460 PRINT" ヒーーCHAF-| " 


C$ "L 1 " с 


ІЛАК2 CHIP CHAP マシ ン 語 リス F NTT 


5058 01 27 
5060 ØF 86 
5068 BD 30 


05 Сі 88 26:80 
01 Сё BE 08:1Е 
SB 1C 20 CC:4D: 


3070 FE 30 09 86 の 1 А7:АВ 


Pi0O 3 月 号 の 名 口 君 へ . 
プル ー チ ン が 載っ て し まっ た -. 私 も 作っ て いた の に な 一 残念 ク で も 私 の は , 文字 変数 も 使え る と いう 強み が ある の だ ハッ ハッ ハー/ (1% 
と ん ど 負 け 惜 し み で あっ た の だ っ た .) 


私 は PC-1245 に 外部 スピ ー カ と カモ キット イ ンタ ー フ ェ イ ス を 作っ て 付け て ま 一 す 。 iif, 2 月 号 の PiO に MUSIC サ 


(K.C.C. NEG) 


UJAF2 CHIP CHAP マシ ン 語 リス ト ` 
ZE: の 6 
FE: 3A 
7C: QC 
1C:46 
7С: さ の 
7C: 90 
ЗӨЗЕС 
703420 
7C: GE 
1F:36 
C8: 78 
AQ: 84 
O5: SF 


ーーー ss es س سس مس‎ --- --- --- 


20 Сі Её の の Ci 88 261 56 | 


85:81 


о LAG. 
инивияния EARE 


FP-1100 


BASIC 


僕 は 今 ま で て , FP で リア ル タ イ ム ・ ゲ 
ー ム を 入力 し て は 楽し ん で いま し た が , ジ 
ョ ニー あん こ ば さ ん の SPACIAL POKER 
(PiO'84 年 6 B.E) & RC, こう いう の も 
いい な あと 思い , 7 な ら べ を 作っ て み ま し 
ВИИИ АВЕ 


強 す ぎ も せ ず , 弱 す ぎ も せ ず と いっ 
| た まあ まあ の 出来 . 欲 を 言え ば コン 
| ピュ ー タ 側 に も っ と 性 格付 けし て ほ 
し か っ た た な. (V) 


ゲ ョ ダラ ム を 入力 ず する が か ロード て し て 
RUN す る と , タイ トル が 表示 きれ て カー 


20 CLEAR 


50 WIDTH 80: SCREEN O: SCALE (0,0) – (159, 


:COLOR 1,7:DEFINT A-Z 
40 RANDOMIZE 


50 DIM 5%(52),Р%(4,12),Н(4,12),Р(4),М 


к(4),М(4),НҮ(12) ,8(4) ,8J(4,4) 
60 SP-1 


70 FOR Ісі ТО 4:READ NA$(I):S(I)=Q@:NE 


XT 


ва GUAD(0,0)-(159,99) „4: PAINT (1,1) 。4。 


90 БОБОВ 2620 


RESTORE 2820 
FOR Ізі TO S2:READ А% 


と 
IF S$(WA)<>"" THEN 120 
S$ (WA) -А% 


FOR Ізі TO 4:FOR J=1 TO 13 
РФ (1,Ј) =5% (0) :0=0+1: NEXT: МЕХТ 


QUAD (0,67) - (159,80) ,7: РАІМТ (1,68), 


FOR Ісі TO 12:FOR Ј=1+1 TO 13 
IF VAL(F ま (1 。1) ) >VAL (P ま (1 。J) ) THEN 
SWAF РФ(1,1),Р%(1,07) 
25@ NEXT:NEXT 
260 FOR Ісі TO 12 
270 X-I*6-4:Y-82 
280 QUAD(IX*12-9, Y) -(I*12, Y*13) ,7: PAINT 
((I*12-9) 81, Y*1) ,7,7 
290 M-VAL(LEFT$ (P$C1, I? ,1)) :N=VAL (RIGH 
T$(P$(CL,I),2) :N$2MID$ (STR$ (N) ,2,2) 
200 IF N$-"13" THEN N$-"K" ELSE IF N$- 
"12" THEN N$-"Q" ELSE IF N$-"11" THEN N$ 
="J" ELSE IF N$-"1" THEN N$-"4" 


p # $ $B, 寝坊 を し て し まっ た 私 は 「 バ ス に 乗っ て いか ね ば 遅刻 する 」 と 思い , 


а - : 
E な いと バス が 来 な い ) OCR 遅刻 し て し まう . 


Си 上 通 の 車輌 で も ら っ な だ ただ) か が 
遅刻 に は 代え られ な e OC り に 取 ろ う 


ド が 配ら れ ま す . そし て プレ イヤ ー の ヵ カー 
ド だ け 開 き 説 明 を 表示 し ます (説明 は 初回 
だ け ). この と き | RETURN キー を 押す と 
ғ-ы жәе POS 

まず , 手持 ちの 7 を 場 に 出し て か ら 金 の 7 
を 持っ て い だ 人 か ら 始 まり ます (ここ は コ 
ンピュータ が 行ない ます ). プレ イヤ ー は , 
自分 の 番 に な っ だ た だら 出し だ た い カ ー ド の 上 


に ある アル ファ ベッ ト || RETURN | に し て く 


АҒА ұғар ТАЗА ЕСЖАПЫР 
%>:ФОАОХФОЛЯАСа3З HARA 


TITITTTITE 
ТТТ 
HILL 
š I. 4 


510 LOCATE X,21:PRINT CHR$( 
ATE X*3,23:FRINT CHR$(231+M); 
LOCATE X+Z+1-LEN(N$) 
Х,25:РКІМТ N$; 
LOCATE 1%6-5,19:РКІМТ CHR$(64*1); 


3 FOR I=1 TO 4:N(IO-13: NE (1) =0: JUNI ( 
IT)= の :P(I)= の sFUR J=1 TO 13:H(I,J) =0: NEXT: 
NEXT:FLAYER-4 

370 E$-"(/3U 13 MZ 0) ":ҒОК 1=1 TO 4: 
IF Ісі ОК I=3 THEN Хі-26 ELSE X1-58 

580 IF I<Z THEN Y1=17 ELSE Y1-18 

390 LOCATE X1*1,Y1:PRINT МАФ (І) +Е%; : МЕ 
XT 

400 IF SP-1 THEN GOSUE 2740 

410 WHILE ІМЕЕҮФ< >СНКФ (17) :1 ОСАТЕ 5,17 
:PRINT" HIT RETURN KEY TO START! !"』sFOR 
Ізі ТО 500: М№МЕХТ:1_ ОСАТЕ 6,17:РКІМТ ЅРС (25 
):ҒОК Ісі TO 300: NEXT: МЕМО: QUAD (14 , 10) - ( 


144,52) 4: РАІМТ (15,11) ,4,4 


7/ FAV IN カッ ティ 


FOR 1=1 TO 4:ҒОК J=1 TO 12 
IF RIGHT$(P$(I,J),1)«»"7" THEN 480 
IF LEFT$(P$(I,J),1)-"S" THEN O-I 
IF Ісі THEN QUAD (21#12- -9,82)-(J+*12, 
96) ,4:PAINT(J*12-8,84) ,4,4 
470 W$-P$(I,J):P$(I,J)2"":GOSUB 2160:N 
(I»-N(I)-1:D-I:GOSUR 2090 
480 NEXT:NEXT 
490 LOCATE 6,17:FRINT "Let's start 
"+МА$ (O); "カラ 7"2"5 
500 FOR I-1 TO 2000: МЕХТ 


510 LOCATE 6,17:PRINTSFC(27):LOCATE 6, 
18: PRINTSPC (25) 


IF. NK(Q)21 THEN 640 
IF 0-1 THEN GOSUB 1840: GOTO 590 
LOCATE 6,17:PRINT NA$(0);" х ју 2, 


GOSUB 820:0М 2-РҒ GOTO 570,580 


231*M) s sLOC 


;,21: PRINTN$;:L ` 


| RETURN |C 4 (パス は 3 回 まで ). 

そし て , 全員 が 終わ れ ば ゲー ム ・ エ ンド 
(プレ イヤ ー が 先 に 終わ っ て し まっ て も 。 
最後 まで コン ピュ ー タ 同士 で 勝負 を し ま 
+). [RETURN キー で 今回 の 結果 が 表示 
され ます . この と き , |Y| キ ー で 再 ゲ ー 


2, |N| キ ー で 総合 結果 が 表示 きれ BASIC 
= 戻り ます . 


ポイ ント は 1 位 10 点 , 2 位 7 点 , 3 位 6 点 , 4 
位 5 点 で す . 

それ に し て も FP は ソフ ト が 少な いで す 
q. 僕 は FP で アド ベン チャ ー ゲ ー ム を や 

* こ と が な い の で 。 誰か 作っ て くだ きい 。 
お 願い し ます . 


570 P(O) =P (0) +1:LOCATE 6,18:PRINT "л 2 
シマ ス " skFUR I=@ ТО 1000:NEXT: GOTO 590 
580 FOR 1=1 ТО 600:NEXT:W$-P$ (0, MA) : РФ 


(O,MA»-"":GOSUB 2160:NCQ)-N(O)-1 


590 D-0:GOSUB 2090 

600 IF F(0)-4 THEN GOSUB 2260 

610 IF N(0)=Ø THEN GOSUB 2410 

620 LOCATE 6,17:PRINT БРС (20) :1 ОСАТЕ 6 


418:РКІМТ SFC(25) 


30 IF PLAYER-O THEN 660 
Q-0*1:IF 0-5 THEN 0=1 


LOCATE 6,17:PRINT "7*-4 シュ ウリ ョ ウ F3 


WHILE ІМКЕҮФ< >СНКФ (15) : LOCATE 6,18 


:PRINT "Hit Return key";:FOR I-1 TO 500: 
NEXT: LOCATE 6,18:PRINTSPC(20) :FOR Ісі TO 
500: NEXT 
690 WEND: LOCATE 6,17:PRINT SPC(25); 
700 PLOT(0,67)-(159,67) ,5:РАІМТ (0,0) 。5 


,S1PLOT (0,67) - (159,67) 4: РАІМТ (0,0) ,4,4: 


QUAD (35,2) - (120,60) ,7:РАІМТ (26,3) ,7,7 

710 SN=SN+1 ` 

720 LOCATE 32,1:PRINT"SCORE BOARD"; : LO 
CATE 47,2:PRINT "27429": SN; 

730 LOCATE 20,3:FRINT" rT 
— n A  " 

740 LOCATE 2@,4:PRINT" 12," 12,71 ナラ マエ 11 
(1) 1(2) 1€32 1(4) IRAK" 
2 780 FOR 1=1 TO 4:5Ј (JUNI <I), 12 Z8J (JUNI 
(I2,I1) *1:IF Ісі THEN S(JUNI(1))=S(JUNI(1 
))*10 ELSE (JUNTI (І) ) «56 (JUNTI (1) ) +9ー 

760 LOCATE- 20, さ + 24PRTNT の に ーー ニー テー . 
ーー 

770 LOCATE 20,4*I*2:PRINT USING "1 8$ 

1% ІНН Ін ІНЕ ІНЕ | ####l"; I; NA$ 
(QUNI(GDO);SJ(OUNI(CI),123 SJ JUNI (12,2) 58J 
(QJUNICIO),3):3SJGUNI6I) 。4) 5S CJUNI CIO) 

780 NEXT 

790 LOCATE 20,13: PRINT" C  —ə_ 
А... 


800 LOCATE 52, 14:РКІМТ"Р1 ау again ? (Y 


アミ メ の 蓋 の 付い だ ドブ の 中 へ 落っ こち て し まっ た . 


停留 所 へ と 走っ た . 最終 バス (8 : 20 の 次 は 17 : 30 ご ろ に な ら 
走っ だ 走っ た.。 いき な り 「 カ チン 」 と 上 計 が し て カバ ン に 付い て いた だ バッチ (エキ スポ 号 
と に か く 斗 を 外し て 取 ろ うと し た が 。 
と 思い 走っ た . 赤 信 号 な の で 中 まっ て いた ら 。 ブロ ロー ト 上 宿 蔽 神 玉 市 バス が 停留 所 へ や っ て 来 た . М 


zx. 


ZN) "3 
810 МФ=ІМКЕҮФ: IF "a OR N$-"N" THEN 
820 ELSE 810 
820 IF N$-"Y" THEN FOR 1=1 TO 52:5% (1) 
z"":NEXT:GOTO 80 ELSE 2500 
и Б а a p= HEU RN 


FOR J=1 TO 13:HY(J)-0:NEXT:FF-1:RI 


FOR 2-1 TO 13 

G$-P$(0,J):IF G$-"" THEN 880 ELSE 
2020 

IF RI=1 THEN FF= の :RIF=RIF+1 : GOSUE 


NEXT 

МАХ--100:ҒОК J=1 TO 12:1F HY(J) = の 
THEN 900 ELSE IF HY (J) >MAX THEN MAX=HY (J 
) :MA-J 

900 NEXT : 

910 IF (МАХ<>-100 AND MAX<@) OR (MAX<> 
-100 AND МАХ<>100 AND FLAYER=2) THEN GOS 
UE 1190 ; 

920 RETURN 


940 V-zVAL(GIGHT$(G$,2)): VV-VAL (G$) 』 VH= 
ieri leet oe 
ЭО IF V-13 OR V-1 THEN НҮ (J) 2100: GOTO 
1168 
960 ІҒ У<7 ТНЕМ 1080 
970 FOR 1=1 TO 13 
980 IF VAL(F$(O,I))sVV*1 THEN HY (J)=10 
02: GOTO1180 
990 V2-VAL (RIGHTS (P$ (O, 1),2)) 
1000 IF LEFT$ (G$, 1) -LEFT$(P$(O, 12,1) АМ 
D У<У2 THEN HY (J)sHY(J)4(/2-V) ^2 
1010 NEXT 
1020 IF HY(J)-0 THEN 1020 ELSE 1060 
1050 FOR I=V+1 TO 12:1F H(VH,I)-0 THEN 
HY (J) HY CJ) -1 
NEXT 
IF HY(J) 0 THEN HY(J)-100 
GOTO 1180 


FOR I=1 TO 13 
IF VAL(P$(O,I))sVV-1 THEN HY(J) =10 
Q:GOTO 1180 
1100 V2-VAL (RIGHT$ (P$ (0,1) ,2)) 
1110 IF LEFT$(G$,1) -LEFT$(P$(O,I),1) АМ 
D V2V2 THEN: HY (J) =HY (J) + (V-V2) ^2 
1120 NEXT 
1120 IF HY(J)=Ø THEN 1140 ELSE 1170 
1140 FOR Ісі TO V-1:1F H(VH,I)-Q0 THEN H 
Y(J) =HY (J-1 
1150 NEXT 
IF HY(J)=@ THEN HY (J) 2100:GOTO 118 


GOTO 1180 
RETURN à 
л те? 9574-2 
IF N(0)=1 OR P(0)=3 OR PLAYER=1 TH 
EN 1810 
+ で IF N (O) <>RIF THEN 1260 
220 FOR Ісі TO 4:IF N(I)-0 OR P(I)=4 0 
K. I=0 THEN 1240 
1230 IF М(12<М(0) AND F (I)>F(0O) THEN 18 
20 ELSE 1240 | 
NEXT:GOTO 1260 


IF PLAYER?2 THEN 1550 

FOR Ісі TO 4:IF N(I)<>@ AND P (I)< > 

І<>0 THEN U-I ELSE NEXT 

IF FCO) >=F(U) THEN 1810 

IF RIFZN(Q) AND N(Q)2N(U) THEN 182 
0 ELSE IF БІҒ-М(0) THEN 1810 


Рб=Р (U) -FP (0) ШР-0: 05-0 
FOR Ісі TO 13:UFzQ:UFF-Q 
IF РФ (0,1) ="" THEN 1520 
V=VAL (CRIGHT$ (P$ (0,1) , 2) ) s VVzVAL (РФ 
(0, І)):УН-УА (LEFT$ (P$ (O, Dr HP MAX < Ø 
THEN 1420 
1350 FOR J=1 TO 13 
1560 IF VV=VAL (F$(0,J)) OR VH< >VAL (LEFT 


.$(P$(0,1),1)) THEN 1400 


1370 6%=Р% (0,Ј) : 60508 2020 

1380 IF КІ=0 THEN 1400 

1:90 IF (У<7 AND VAL(RIGHT$ (РФ (0, Ј) ,2)) 
<7) OR (V>7 AND VAL (RIGHT$ (P$(O0,J), 2)) 27 
) THEN 1520 

1400 NEXT 

1410 REM 


1420 IF У<7 THEN 1470 

1420 FOR G-8 TO V-1:1F H(VH。D) = の THEN 1 
440 ELSE 1460 

1440 FOR Р=1 TO 12:1F VH-VAL(LEFT$ (РФ (O 
,P),1)) AND Q=VAL (RIGHT$(P$(0,P),2)) THE 
N UF-Q:UPF-Q:GOTO 1520 

1450 NEXTP:UF-1:UPF-UPF-*1 

1460 NEXTQ:UP-UP«UPF:GOTO 1510 

(1470 FOR Q=V+1 TO 6:IF H(VH。Q)= の THEN 1 
480 ELSE 1500 

1480 FOR Р=1 TO 12:ІҒ VH-VAL(LEFTS$ (РФ (O 


5P) 。1) ) AND O-VAL(RIGHT$(F$(O,P),2)) THE 


N UF=Q: UFF=Q: GOTO 1520 ; 
1490 NEXT P:UF-1:UPF-UPF-*1 


ТЮ eto dex dE > L U: t š, 
US у= Е А UK ХЭ ерд 


NEXT Q:UP-ZUFP-«UFF:GOTO 1510 

IF UF-1 THEN US=US+ 1 

NEXT I 

IF FS»-UF-US*1 THEN 1820 ELSE 1810 


IF Р(0) >1 THEN 1810 
KN-8-RIF: Q ド = の 
FOR I-1 TO 4 
IF H(I,1)=@ THEN 1610 
FOR J- 2 TO 6:IF H(I,J)-0 THEN 161 の 
NEXT J 
KN-KN- 1 
IF H(I,123)20 THEN 1640 
FOR J-8 TO 12:1F H(I,J)-0 THEN 164 
Q ELSE NEXT J ' 
1620 KN-EN-1 
1640 NEXT I 
1650 FOR 1-1 TO 1 さ : ド に に = の 
1660 IF P$(0,J)-"" THEN 1740 
1670 V= VAL (RIGHTS (РФ (O, J) 。2) ) :VH-VAL (LE 
ЕТФ (РФ (0,73) ,1)) 
1680 IF У<6 THEN 1720 ELSE IF V>9 THEN 
1690 ELSE 1740 
1690 FOR I-8 TO V-1:IF H(VH,V—-1)-Q0 THEN 
ドド = ドド +1 
1700 NEXT:IF КК<2 THEN АК=АК+1 
1710 GOTO 1740 
1720 FOR I=V+1 TO 6:IF H(VH,V*1)-Q THEN 


кк=кк+1 


1750 NEXT:IF KK«3 THEN AK=AK+1 

1740 NEXT 

1750 IF КМ>0 THEN 1800 

1760 FOR Ісі TO 4:ІҒ O-I THEN 1770 ELSE 

IF F(1)<=F(0) AND RND (1) >.9 THEN 1810 

1770 NEXT :GOTO 1820 

1780 IF КМ№0 (1) <.6 OR Р(0) =0 THEN 1820 E 
LSE 1810 

1790 IF RIF-1 AND (0-2 OR 0-4) THEN 182 
0 ` . 

IF RND (1) < (AKZEN) ^2 THEN 1820 ELSE 


FF=Q: RETURN 
FF=1: RETURN 
С а о ا ا وف‎ s. 


LOCATE 5,17:PRINT" 779 ノリ ドン テッ ス 2" 
LOCATE 20,17:PRINT" _ "j 
А%-ІМКЕҮФ: IF АФ<>"" AND A$<>CHR$(1 

ТНЕМ 1890 
1870 FOR І-і TO 200:МЕХТ ; 
1880 LOCATE 21,17:PRINT "  ";:FOR I=1 T 

O 200:NEXT:GOTO 1850 
LOCATE 21,17:PRINT АФ 
LOCATE 22,17:PRINT " "; 
R$=INKEY$: IF R$-CHR$(12) THEN 1940 
IF КФ=СНКФ (25) THEN 1850 : 
FOR Ізі TO 200:МЕХТ і 
LOCATE 22,17:PRINT " ";:FOR 1=1 TO 

200:NEXT:GOTO 1900 

1940 LOCATE 22,17:PRINT " "; 

1950 AB=ASC(A$):IF (AB<65 OR AB>77) AND 
AB< >80 THEN 2000 Ң 
1960 IF АВ-80 THEN Р (1) =Р (1) +1:60Т0 201 
の 


`197@ G$-P$(1,0B-64):IF G$-"" THEN 2000 _ 


ELSE GOSUE 2020 
1980 IF RI-O THEN 2000 
1990 W$-G$:F$(1,A4B-64)2"":QUAD((AB-64)* 
12-9,83) - CCAB-64) *12,96) , 4: PAINT (CAB-64) 
ж12-8,84),4,4:ҒОК I-1 TO ZQ:NEXT:GOSUB 2 
1695 N(1) =N(1)-1: GOTO 2010 
LOCATE 6,17:РКІМТӘРС(20):60Т0 1840 


A-VAL (LEFT$ (G$, 1) ) : B=VAL (RIGHT $ (G$ 


IF В<7 THEN 2070 
FOR Р=8 TO B-1:1F Н(А,Р) =0 THEN RI 
=0: RETURN ELSE NEXT š 
2060 RI=1:RETURN 
2070 FOR F=E+1 TO 6:IF Н(А,Р) =0 THEN RI 
=0: RETURN ELSE NEXT 
RI-1:RETURN 
Tuy m 


IF D=1 OR D-23 THEN X1=42 ELSE X1=6 


IF D=1 OR D-2 THEN Y1=17 ELSE Y1=1 ` 


LOCATE X1,Y1 
FRINT USING "(ノコ リ 44 nz #)";N(D) 


RETURN t 
"UG اد‎ == 


A-VAL (LEFT$ (ИФ, 1) ) : E=VAL (RIGHT $ (W$ 
42) ) 5N$-ZMID$ (STR$(B),2,2) 

2170 IF N$="13" THEN N$-"K" ELSE IF N$- 
"12" THEN N$-"Q" ELSE IF N$-"11" THEN N$ 
z"J" ELSE IF МФ-"1" THEN М%="А" 

2180 QUAD(B*12-9,0*16-12) - (B*12,0*16) ,7 
:FAINT(BE*12-8, Ax16- 12) .7,7 

2190 IF A=1 OR 4-24 THEN C-0 ELSE C=2 

2200 COLOR C,7:X-6*B-4:Y-4*0-3 

2210 LOCATE X, Y: PRINT CHR$ (231+A) 

2220 LOCATE X*3,Y*2:PRINTCHR$ (231-4) 

2230 LOCATE X+4-LEN (N$) , Y: PRINT N$; 

2240 LOCATE X,Y+2:PRINT N$; 

2250 COLOR 1, フュ H(a。 B)=1:RETURN 


02,303,304 
12,313,401, ,402, 405,404, 405,406,407,408, 4 


ше 


7 な ら べ BASIC リ スト 
л 4 カイ マ ケ サフ "ルー チ 


FOR 1=1 TO 3:LOCATE 5,18:PRINT" n° 
y"qy "2 "j:LOCATE 5,18:NEXT 
NK (0) 21: PLAYER-PLAYER-1 
FOR I-4 TO 1 STEP -1 
IF ЈОМІ (1) =0 THEN JUNI(I)-0:GOTO 2 
310 ELSE NEXT 
2310 FOR 1=@ TO 2000: NEXT 
2320 FOR Ізі TO 13 
2330 IF Р%(0,12<>"" AND O-1 THEN QUAD(I 
*12-9,83) - CI*12,96) ,4: PAINT(I*12-8,84) 。4 
,A:FOR Р=1 TO 10:NEXT:GOTO 2540 ELSE IF 
РФ%(0,12<>"" THEN 2340 ELSE 2550 
2340 W$-P$(O,I):GOSUB 2160 
2350 NEXT i 
2260 IF OcZ THEN Ү1=17 ELSE Y1=18 - 
2270 LOCATE 64-22*(0 MOD 2),Y1:PRINT "( 
PEA pos qiya уе. 
FOR ї=@ ТО 1000: МЕХТ 
LOCATE 6,18:PRINT SFC (30) ; 


` 


LOCATE 5,18: PRINT " УЛУУ“ л "ssFOR 
.TO 70 STEF Z:NEXT 
NE (O) 21: PLAYER-FLAYER- 1 
FOR I-1 TO 4 
IF ЈОМІ (1) =0 THEN JUNI (1) =0: GOTO 2 
470 ELSE NEXT 
2460 IF 0<2 THEN Y1=17 ELSE Y1-18 
2470 LOCATE 64-22*(0 MOD 2),Y1:PRINT "( 
7n" 0225 )"s E 
2480 FOR I-0 TO 1000:NEXT:LOCATE 6,18:F 
RINTSPC (30) ; 
2490 RETURN 
2500 REM "437? "wh / зе “ЕМ 
р ar on an s... ーーーー ニ ーー ニーーーー ニ ーーーーーーーー 
2510 CLS š 
2520 FOR I-1 TO 3:FOR J=I+1 TO 4:IF S(J 
UNI(I))ZS(JUNI(J)) THEN SWAF JUNI (1I) , JUN 
IQ) 
2520 NEXT:NEXT 
2540 LOCATE 22,4:FRINT"TOTAL SCORE"; 
2550 LOCATE 18,5:PRINT" ---------- 
2560 LOCATE 18,6:PRINT"Iz"a»4|! T * I 12 
74 IR AVR 1(1) 1(2) 1(3 5) 1(4) 1" 
2570 FOR I-1 TO 4 
2580 LOCATE 18。5+2wTsFRINT" ーー トー 
ーーー キ ーーーー キ ーーーーー キ ーーーー キ ーーー キ ーーー キ ーーー1" 
2590 LOCATE 18,6*2*1:PRINT USING"! # 


1 & L HHH IHHHHH HHH HHH 1#+#Н1###1";1;М 


АФ (JUNI (IJ) 5 SN; S(JUNI (1)) 5 SJ (JUNI (1) ,1) 5 
SJ (JUNI (1) ,2) 38J (JUNI (D) , 3); SJ (JUNI (1) , 4 
) 

2500 NEXT 

2510 LOCATE 18,15: РКІМТ" ーー 
EEE YE EOE DEEN ORA OL EPEAT ОРУ O 

LOCATE 0,90: ЕМО 
タイ トル tao" 


QUAD (35,2) - (120,60) , 4:PAINT (36,3), 
, QUAD (14,10) 7 (144,82) ,71PAINT (15,11 


LOCATE 15,4: FR INT " maw ^ 
чм. а 
(ОСАТЕ 15,5:РКІМТ" ағ GR 
E КЕ. 
LOÇATE 15,6:FRINT" a s 
a. Lj ағ CU. 
2590 LOCATE 15, 7: PRINT" と б と 
L5] (€—Ü ap чь 
2700 LOCATE 15,8:FRINT" aS 
Lu Ж 24 a. 
2710 LOCATE 15,9:FRINT" Р 
uil" CNN Á чь. 
2720 LOCATE 49,11:PRINT "By FC-8801mkII 
EF" 120" 
2720 RETURN 
2740 REM 


4 


b. 


2750 QUAD(14,10) - (144,52) , 4: РАІМТ (15,11 
),4,4 

Mer QUAD (14,10) - (144,52) ,7:PAINT(15,11 

EGT 

3938 LOCATE 10,4: PRINT"7T5^" 75-0 957%; 
:LOCATE 11,6:PRINT"2*L4f- М 4 ニッ $.FP が 

ду フトン ウケ モテ マズ 。 7194 -R ә? ="; sLOCAT 
E 11,8:PRINT" ヒ ョ ウシ "サレ テイ マス 。 カー ト ~ ./ ウエノ アル ファ 
wy ト テ "エラ ヒト" フス 。 МА 27 トキ n P ЭЯ"; 

2780 LOCATE 11,10:PRINT" シ テ 29" 97. N° ZN 
лї 25" テー キマ スズ 。 ダイ ヤノ フラ モ w テ イル ヒト カラ и" A3 
2% ys š 

2790 5Р-Ф 

2800 RETURN 

2810 КЕМ 


2820 DATA "777 "Com 1,Com 2,Com 3 

2830 DATA 101,102,102,104,105,106,107,1 
08,109,110,111,112,112,201,202,202,204,2 
05,206, m was ЗАР dede за 
205,206,2:07,208,209,510,511,52 


09, 410, 411,412,415 


バス は 私 を 残し て まっ て し まっ た . 帰り バッ チ を 取 ろ う ) と ドブ を 調べ で た が 。 バッチ は 流さ れ て 
P.S. 私 の ペン ネー ム は あん まり か つこ いい こと な いな あ . し か し , 冬 は お な で ん が ん まい っ / (お で ん ) 


GC-3000-BASIC Level Ш B 


BASIC Level III B 十 (マシ ン 語 ) 


21 世 紀 後 半 , 地球 は 謎 の 宇宙 生物 に 衣 わ 
れ よ うと し て いた . それ を 防ぐ べく 地球 防 
衛 軍 は , 宇宙 戦闘 機 MEGALOT を 出撃 さ 
せ た . あな た は MEGALOT を 操縦 し , ど 
こま で 地球 を 守る こと が で きる か ./ 

画 プ ログ ラム ・ イ インフォメーション 


Ш | BASIC Level ШВ 


| 敵 が だ ん だ ん 大 きく な る の と スピ ー 
ç | 下 に は 和 驚き まし た . た だ , MDM 
| が ワン ・ パ ター ン な の は 残念 . (V) 


入力 の 仕 万 


ます り リズ スト 1 を 入力 し も 。 カ セッ ド セ に セー 
TLT. そし て NEW を 実行 後 , リス ト 
ТАЛ. カッ ヤヤ に や セー プ し て くだ る おち 
v. それ か ら MDATA 文 は , > СЬ 
える と 禁 走 する か も し れ な い の で , 慎重 に 
AU, まく (見 直 じ てい て て だ る い , 
プロ グラ ム を 実行 する と き は , リス ト 1 


1 REM MEGALOT 

2 REM 

3 REM Made by Hidehisa Shimizu 

10 FOR А=&НС@@@ TO &HC241:RERD A$ :POKE 
A, UnLC"&H" +$) :NEXT :BEEP2:END 

100 DRTR3E , 1,32, 4 , B9, 1,10, 22,С0, 25, CO, 
1, E8,3,CD, 25,C0,1,64,0,CD, 25, C0, 1, 06,0 
‚СО, 25,C0,365,0,B0, SF , CD, 41, C0, C9, 265,0, 
BO, 1E , 9, RF , ED, 42; 38,3, 1C 

110 DATA^18,F8,9,22,0,B0, 35,4, B0, 3D; 20, 
95; 7B,D6,1,38,37, ^F, 32, 4, B0, 52, ^F, CB; 13 
‚СВ, 12, RF , CB, 13, CB 12, AF CB, 13, CB 12, 2 
1,83, C0,19, 22, E BO, CD, 6E, AF, 9 

120 DRTR28,FR, 2R, 2 B0, 7D; D3, BF; 7C; E6,3 
F,D3,BF,28;, E;B0,6,8, 7E; D3, BE, 23, 10, F^; 
205,2,B0,1,8,0,9,22,2, B0,C9,0, 1С, 22, 22, 

:22,22,22,1С,0,8,18,8,8 

130 DRTR8,8, 1C,9, ЗЕ, 2,2, 3E , 20, 29, 3E , 9 
3E,;2,2, 1E, 2, 2, 3bE,0,20,20,24,24,3bE, 4,4, 
0, 3E, 20,20, 3E, 2, 2; 3E, 0, ЗЕ, 20, 20, 3E , 22, 
22, 3E, 0, 3E , 22, 2,2 

140. DAT62,2,2,0,3b, 22, 22, 3E, 22, 22, 3E , 0 
;3E,22, 22, 3E, 2,2,2, CD; D6,C1, CD; E0,CO,C 
D;ED,C0,CD, 9E, C1, C9, 369,10, B0, 3D, 28, 53, 
ЗА, 11,В60, 30, 28,28, C9, ЗА, 12, BO 

150 DRTR3D, 28,5,6F,32,6,B0,C9, 35,6, BO, 
3D, C8, ЗА, А, BO, 3D, C8, GE, 1, 32,6, B0, 32, ñ, 
B0,265,8,B0,22, B, B0, 32,D, B0,C9,365,8,B0, 


76) いき な り 人 名 事典 . 


кыйл. Кә. RUML TLR GOTO k 
BEEP 音 が し て “Ready” と 表示 る れる の 
€, リス ト 2 を ロー ド し て RUN す れ ば ゲ 
ー ム が 始ま り ま す 。 


HOF 


移動 は カー ソル ・ キ ー で , ビー ム 発 射 は 
| SPACE | キー で す . な な ジョ イス ティ ッ 
2 も 遊べ ます . 

得点 は 小さ いも の ほど 高く , 大 きい も の 
か ら 順に 5 点 , 10 点 , 20 点 , 40 点 と な っ て 
ry £245, ДИР SODS TELA 
ー ジ が 変わ り 。10 ス テー ジ ま で だ ん だ ん と 
全体 の スピ ー ド が 速く な り , 11 ス テー ジ に 
な る と 1 ステ ー ジ の 時 と 同じ 速 き に な り ま 
+. 後 は その 操り 返し で す . 


プロ グラ ム の 説明 


ゲー ム の 主 な 処理 は マシ ン 語 で 行なっ て 
いま す 。 な に し ろ マ シン 語 モ ニタ が な い の 
C, この グロ グラ ム を 作る の に は 大 変 苦労 


6, 19, B8,C8, 3C, 32, 8, BØ, CB 

169 DRTRZ,CB,2, CB, フ , D6, 4 21, 1, 3B, F5, 7D 
>D3,BF , 2C, E6,3F, F6, 49,D3,BF,F1,D3, BE ,C 
9,36,8,B0,6,2,B8, D8, 3D, 32, 8, B9, 18, D9, 3 
A, A, BØ, D6, 1,08, 26, B, BO, CB 

120 DATAS, CB, 5, CB,5, 2B, 22, 2, B9, 21 , BE , C 
1; 22,E,B9, CD, 5C, C0, 36, C, B0,6, 1, B8, 38,2 
F,3D,32,C, B0,67,365,B, B9, CB, 2, CB, 27, CB, 2 
+ BF , 2B, 22, 2, B0, 21, C6, C1 

180 DATA22,E,B9, CD, 5C, C0, 26, 2, BO, 1, F8, 
1F,9,22,2,B0,21, CE, C1, 22, E, B0, C3, 5C, CO 
‚AF, 32,A, BØ, C9, 3A, D, B9, 6, 1 1 , B8,C8, 3D,E 
6,F,C6, 99, 47, 3E, 8F , D3, 7F , ЗЕ 

190 DATA20, D3, 2F , 28,03, 2F , 36,D, B0, зс, 3 
2,D, B9, C9, 9, 9, 9, 9 9, 9, 9, 9, 18, 18, 18, 18, 
18,18,18,18,F1,F1。F1,F1,F1,F1)F1,F1, 3E 
; 1503, C2, DB, C0, CB, 62, 20,4 

200 ОАТАЗЕ, 1,18, 1, 6F, 32, 12, BO, 3E, 5, D3, 
C2, DB, C0, CB, 6F, 20,4, 3E, 1 , 18, 1, 8F , 32, 10 
> BO, 3,6, 03, C2, DB, CØ, CB, 6F , 20, 4, 3E , 1, 1 
8,1, 8F, 32, 11, BO, 3E 2, D3, C2 

210 DRTADB, C0, CB, 527, 20,8, ЗЕ, 1,18, 1, fF, 
32,10, BØ, 3E, 2, 03, C2, DB, C0, CB, SF, 29, 8, 3 
E, 1518; 1, 6F, 32, 11, B0, 35, 2, D3, C2, DB, CO, 
CB, 62, 29, 8, 3E , 1 , 18, 1, F , 32 

220 DATRA12,Bg,C9, CD, 50, C2, CD, B9, C2, CD, 
B,C5,CD, 21, C5, C9, 21,0, 0, 22, 16, B0, DD, 21 
> 1E, BØ, CD, 23, C2, 3A, 15, B0, зс, 32, 165, BØ, 1 


一 清水 栄 寿 


STAGE 
1 


し まし だ 。 また だ 入力 する 方 も 。 チェ ッ ク サ 


まあ 頑 


ム が な い の で 大 変 か と 思い ます が , 
張っ で て だ さる きい 


SC-3000 の プロ グラ ム は ROM ゲ ー ム が 
普及 し て いる こと も あっ て ,。 ちっ と も 本 に 
載り ませ ん が 。 これ か ら は よく 載る よう に 
皆さん も 頑張 っ て SC-3000 の プロ グラ ム を 


増やす よう に し まし ょ う . 


英 の 高速 大 量 攻 撃 に は 脱帽 


MEGALDT 


HI- 
SCORE 
ас 
SCIRE 
245 


-ЕҒТ 


" リスト 1 MEGALOT 初期 設定 プロ グラ ム ШЕННЕН 


‚25,8, DD, 9, D6, A, C8, ЗА, 1B, B, 3D 

238 DRTRC8, 18,E フ , 00, 2E , 9 D6, 91 , D, 3E , 1 
: 32, 1B, BO, E; 19, CD, 48, C5, 3D, CO, E 2, DD, 3 
6,0,1, CD, 48, C5, 3D, 28, 16, DD; 36, 1, 0, DD, 3 
6,2, 1, DD, 36,3, 8, DD, 36,4 

240 DRTR8, ЗЕ, 1,32, 1С,Ве, C9, DD, 36, 1, 0,D 
D,36,2,2, DD, 36,3, 10, DD; 36, 4 , 8, 18, E8, ^F 
, 32, 165,80, DD, 21; 1E; B0, CD, D5, C2, 35, 16, B 
0, 3C, 32, 16, B0, 1, 5, 0, DD, 9 

250 DRTRD6,R,C8, 18, EC, DD, 2E, 0,D6, 1,08, 
28, 11, 3D; C6, CB, C4, зо, CA, D8, са, 3D, CA, CB 
‚ C4, 3D, C6, ЕВ, C4, C9, DD, 2E, 1, D6, 14, D, C1 
: C3,D6,14, DR, B2, C3, D6, 14, Dh, ар, сз 

260 DRTRD6, B, DR, аз, сз, 28, 45, 3D, 28, 6A;C 
D,CB,C3, DD, 2E; 4,06, 12, 28,33,00, 7E, 3,6, 
18,B8, CC, 8F , СЗ, 3C, DD, 22, 3, DD, 34, 4, CD, 1 
0,C4,DD;, 2E, 2,06, 1, 38, 4, DD, 22 

220 DAT82,C9, E, 3, CD, 48, C5, C6, 42, DD, 22; 
1; £5, CD; 48, C5, C6, 3, DD; 22, 2, C9, DD, 36,0 
; 09, C9, CD; CB, C3, DD; 7E 4,06, 127, 28, F 1, DD, 
ZE 3 6, 3 B8, DC, 99, C3, 3D 

280 DRTRDD, 2 フフ, 3, DD, 34, 4,С0, 10, C4, DD, 7E 
: 2 D6, 1 , 38, C2,DD; フフ , 2, C9, CD, CB, C3, DD, 2 
Е,4,06, 17, 28, C9, DD; 34, 4, CD, 10, C4, DD, 7E 
‚ 2,06, 1 , 38, 57, DD, 22, 2, C9, DD 

290 DAT836,1,42,F5, CD, 3C, C3, F1, C9, DD, 3 
6,1,49,F5, CD, 3C, C3,F 1, C9, CD; CB, C3, CD, 2 
9, C4, CD, 10, C4, C9, CD; E6, C3, CD, 29, C4, CD, 


Ж. 画 力も 無い くせ に 「『 一 本 本 』 の 姓 を 名 乗り 9, 役 に も た た な いよ うな 『 お 絵描き 教室, を PiIO に 幸せ 。 ほ と ん 
と 常連 の よう に な りつ つ あ る どこ ぞ を の や っ つ . 


(みな か み 遊 と 同一 人 物 の 一 本 木 蜜 ) 


32,С4,С9, CD, F4,C3, CD, 73, C4, CD, 55, C4 
300 DATACS9,CD,F4,C3, СО, 79, C4, CD, SD, C4, 
C9,CD,2,C4,1,8,0, ^F, ED, 42, 22, 2, B0, 21,3 
2,C6,22, E, B0,CD, 3D, C5, CD, 3D, C5, C3, 3D,C 
9, CD, 2, C4, 22, 2, B0, 21, 32, C6, 22 

310 DATAE, BO, 18, EC, CD, 2, C4, 22, 2, B0, 21, 
32,C6,22, E, B0, 18, E1, DD; 6E; 3, DD, 66, 4, CB 
, S9 CB, 5, CB, 5,2B, C9, CD, 2, C4, 1,8, 0, ^F, ED 
; 42,22,2,B0,21, 02, C5, 22 

320 DATAE, BO, со, 3D, CS, CD, 3D, C5, CD, 3D,C 
うぅ 28,2, B0, 1, E8, 1F, 9,22, 2, B0, 18, 6, CD, 2 
;C4, 22,2, B0,21, 82, C5, 22, E; BO, CD, 3D, C5» 
CD, 3D, CS, 2А, 2,В80, 1, F0, 1F,9 

330 DAT822,2,B0,18,8B,21, 22, C5, 22, E; BO 
;18,6,21,62,C5, 22, E; BO, CD, 2, C4, 22, 2, BO 
; CD, 3D, CS 2652, B0, 1, F8, IF,9,22, 2, B0, СЗ 
, 3D; C5, DD, 2E, 1, 4F,6, 0, FD 

340 ОАТА21, 4A,C6, FD, S, FD, 7E, 0, EO, F, DD; 
46,4, 3D, 88, DD, 22, 4, DD; 2E; 2,30, 28, 21, FD 
; 2E, 0, E6,F0,CB,F, CB, F,CB,F,CB,F,3D;, DD 
46,3,80,0D; 77, 3, DD, 34,1 

350 DRTRDD, 2E , 1,06, 42, CT 32, C3, C9, FD,7 
E,0,E6,F0,CB,F,CB,F,CB,F,CB,F,3D, ED, 44 
; 18, DB; 3E, 1, 32, 1D, B0, 21, D2, C5, 22, E, B9, 
18, E,21,2,C6,22, E; B0, 18,6 

360 DRTRDD, 34,9,C3, св, Сз, DD, 34, 0, CD, 2, 


REM 

REM MEGALOT 

REM 

REM SEGA SC-3008 

REM 

REM BASIC LEUEL3 16KBRRHI1 

REM 

REM Made by Hidehisa Shimizu 

9 REM 

10 FOR 和 有 =&HRF99 TO&HAF24:READ A$ :POKEA 
s URL C" &h" 8$) :NEXT 

20 DATA 21,07,08, 22 , 92 , B9, 2A, 16, B9, 22, 
00,B0, CD, 99, C9, 2 1 , 2, 0B, 22, 02, BO, 2R, 1 4 
; B0,22, 00, BØ, CD, 99, C0, 21, D2, 0E, 22, 02,B 
9, 2А, 18,B9, 22, 00, BØ; CD, 00, са, C9, CD, D3 

30 DATA се, со, 39, C6, CD, 46,C1 ,CD, 99, C6, 
CD, 43, C2, CD, 90, C6, CD, 59, AF, CD; 46,C1, CD 
ぅ 99, AF, CD, 00, AF , 38,52, BO, D6, OA, C8, За, 5 
3, B0, 30, C8, 18, DS 21, 00, 08,01, 01, 99, AF 

40 DATA ЕО, 42, 20,ЕВ,С9, 3E, 01, D3, BF; ЗЕ, 
8F,D3, BF; C9, DB; BF, E6,2,D6,2,C9 

90 GOSUB 390 :5СРЕЕМ2, 2:МАС1 :COLOR15; 1: 
CRLL&HRF65:CLS:ST-0:SP-&H800:GOSUB 280 
:ЅРВІТЕӨ, ( 199, 1 26 ) , 9, 15 

60 CURSOR219,29 :PRINT "FEGRLOT " : CLIRSOR 

222,48:PRINT"HI-" :CLIRSOR222, 56 :PRINT"S 
CORE" : CLIRSOR222, 80 : PRINT"SCORE " : CLUIRSOR 
230, 104 :PRINT"LEFT" :CLIRSOR222, 128:PRIN 
T"STAGE" : CLIRSOR20, 89 :PRINT "MRIT A MOME 
mI 

20 D=&HB999 :FORR=DTOD+83 : IFR く <>D+22RNDR 
«2D*23THENPOKER, 0 

80 NEXT : 

90 POKED+8, 13:POKED*9, 22 :POKED*81 , &HEO 
:POKED*24, 3:GOTO 210 

100 COLOR15:CALL&HAF65 :CURSOR2 19, 20 :PR 
INT"MEGALOT " 

110 CURSOR 232,136:PRINTST 

120 GOSLIB320 : CUIRSOR90 , 80 :PRINT "RERDY9 9 
":GOSLB 330 

130 CRLL&HRF2E : IFPEEKCD*82)-:10THEN190 

140 GOSUB299 :CRLL&HRF 2E : GOSUB300 :CRLL& 
HAF 2E : GOSUB319 : CALL &HAF 2E :SPRITEO, (0,2 
00) :FORR=9T019:CRLL&HC146 :CRLL&HC243 :N 
EXT :SOLINDO :FORA-D*30TOD*2S9STEPS:IFPEEK 


омоОо d) + сую ~ 


2803430941 
№ BINO 
№ て を , た て 叶う 7 と 262 


‘C4, 1 98, 9, RF , ED; 42, 22, 2; BO, CD, 3D, C5, CD 


s 3D, C5, CD, 3D, C5, 26,2, B0, 1, E8, IF, 9, 22, 2 
; B0, C3, DD, C3, 3A, 1C, BO, 3C, 32 

320 DRTR1C,B9,C6, 10,42, 3E, RF ,D3, 7F , 28, 
03, 7F, 3E, BØ, D3, 7F,C9, 3A, 1D, B0,6,11, B8, 
C8,3C,32, 1D, BO, D6, 2, C6, F0, 42, 3E, EF, 03, 
2F , ЗЕ, ЗЕ, D3,7F,78, 03, 2Е, C9, CD, 5C, CO 
380 DATA2A,E, Bd, 09, 22,E, BO, C9, 2A, 50, BO 
; 2E,91, 309, FD,81, 23, 22, 50, B0, 11, 0, C5, 02 
; ED, 52, D8, 21,0, C0, 22, 50, B0, C9,0,0,18,3 


С,3С,18,0,0,А1,А1,А1,А1,А1,А1 


390 DAT^851,81,0,FF, 2Е, 2Е, 18, 24, 42,0,31 
;91,91,91,91,; B1; B1, B1, 0, FF, 3F, 2F,F, 3,4 
:18,0,FF,FC,F4,F0,C0,20,18, 31, 31, 31,31 
;31,31,B1, B1; 31, 31, 31, 31, 31, 31 

400 DAT8^B1,B1,0,FF, 3F,F,3,0,0, 3, 0, FF,F 
F,FF,FF,3C,C3,0,0; FF,FC,F0,C0,0,0,C0,2 
1;21,;21,;21,21,91, 21, B1, 21,21, 51, 51,71, 
21,В1,В1,21,21,21,21,21,91 

410 бата21,В1,0,0,0,0,0,0,0,0,10,28,44 
JAA, AG, 48, 34,08,0,0,0,0,0,0,0,0,91,91, 
91,91,91,91,91,91,91,91,91,91,91,91,91 
9 1,91,91,91,91;91;91 

420 ПАТа91,91,3,6,9,6,6,9,9,6, 24,8В,24 
,82,95,49,32,CD, 88, 40,80,80, 40, 80, 80,0 
0,91,91,91,91,91,91,91,91,91,91,91,91, 


CA) 1 THEN169 

150 РОКЕА,0 

160 NEXT :ҒОКА=0Т050 :NEXT :GOSUB280 : SPR I 
ТЕЙ, (100,126) :POKED*8, 13:BLINECO, 0)- (2 
21,1912), , BF :POKED*10, 0 

120 A=PEEK(D+24) :A=A-1 :IFA=-1THEN220 
180 POKE D+24,A:POKE D*83,0:GOTO 100 
190 FORA=ØT015:CALL&HAF2E :NEXT : GOSUB32 
9 : COLOR 15 :CRLL&HRF 65 :CURSOR39 , 80 : PRINT 
"NEXT STAGE":SOUND 0:FORA-D*30TOD*298:P 
ОКЕА, 0 : NEXT :POKED*82, 9 

200 FOR А=6Т03 :500М01, 900, 15 :FORB=9T04 
0 : NEXT : SOUNDA :FORB=9T049:NEXT : NEXT :GOS 
UB320 :SP=SP-&H89 : IFSP く <&H389THENSP=&H89 
9 

210 ST=ST+1 :BLINE(232。, 1363221250, 1 44 ) , 1 
, BF :POKE&HAF SA, SPT0D256 :POKE&HRFSB, INT 
(5Р/2562:60Т0 100 

220 A-PEEK(CD*20)*PEEKCD*21)x256:B-PEEK 
(D*22) *PEEKCD*23)X256 :IFB く <RTHENPOKED+2 
2, 8M0D256 :POKED*23, ІМТСА/256) 

230 GOSUB320 :CURSOR89, 80 :PRINT "GAME OU 
ER" :CLIRSOR210,;, 20 :PRINT"MEG" :GOSUB 560 
240 CLURSOR25, 99 :PRINT "PUSH АМҮ KEY" 
290 IFINKEY$ く > " "THENSQ 

260 IFSTRIG( 1 ) く <>9THENSg 

228 GOTO 250 

280 PRTTERNS#9, "0101010143434345":РАТТ 
ERNS#1, "E666F62BF 22ВЕ 241" :РАТТЕЕМЅ#2, " 
80808080C2C2C2Eb 2" :PATTERNS93, "62226ВҒ2 
ЕВҒҒЕ 282" : RETURN 

290 PRTTERNS#9, "2000430409052802" :PRTT 
ERNS# 1 , "992515698922199" :PATTERNS#2, " 
BOF 20810E804E014" :PRTTERNS#3, "442204С0 
3822C999" :RETLIRN 

300 PRTTERNS#9, "99999999994C9318":PRTT 
ERNS#1, "13001 30800030000" :PATTERNSR2, " 
0000000008C03008" :PATTERNS#H3, "28C91 0A0 
008800008" :RETURN 

310 PATTERNS#0, "2000000000000304 " :PRTT 
ERNS# 1 , "0003201 100000400" :PATTERNS#2, " 
り 9999999999999999":PRTTERNSH3, "30080010 
19999999":RETURN 

320 BLINE(29,89〕-(152, 88), , BF :RETURN 
330 RESTORE 380 


x * 
> % 


+ E ES CC КҮ 
АДЕ 


Eon 24 : Au cid сау 
incra Pu Уға 


_ Pio 


リス ト 1 MEGALOT 初期 設定 プロ グラ ム 


91,91,91,91,91,91,91,91,91,91 

430 DATA91,91,0, 0,0; 0,0, 0,0,0,0, 0,0, 0, 
0,0,0,0,0,0,0,0,0,0,0,0,11,10,21,12,12 
,01,01,10,10,10,21,21,22,12,12,12,2,1, 
1,1,0,10 

440 D^T8^0,10,20,10,20,20,21,21, 21, 21,2 
2,22,12,12,22,12,2,12,12,12,2,1,1,2,1, 
1 , の, 1 , 9 1,0, 18, 180,80, 10,10, 180,10, 10, 20, 
10,20,28, 21,21,21,21,21 

450 ОАТА21,0,0, 22, 1А, Ве, DD, 21, 1E, BO, DD 
‚ 2Е,0,30, 20,0, CD, BE, C6, DD; 2Е, 1,06, 47, 3 
8,3, CD, 22,C2, 3A, 16, B0, 3C, 32, 15, BO, D6, A 
;C8,1,5,90,DD,9,18,DC, 3A, A 

460 DRTRB9, 3D, C9 за, C, BO, DD, 46, 4, 90, CO 
; DD, 7E, 1,06, 28, 38, 2С,06, 14, 38, 41, 36, B, 
B2, DD, 46,3, 5,90, D8, D6, 3, D0, 1,5, 0, 20,14 
;B0,9,22,14,B80, DD, 36, 0,2 

420 DRTR3E, 1,32, 10, BO, AF, 32,5, B0, 21, 52 


' B0, 34, C9, 36, B, BØ, DD, 46, 3, 90, CO, DD, 2E 


1,D6,14,38,5,1,14,0,18,3,1, 28,0, 18, CE, 
3A, B, B0, DD, 46, 3, 90, D8, D6 
480 DRTR2.,D9, 1 , ,9, 18,BE , 00, 7E, 4,06, 16 
, D8, За, 8, BO, DD, 46,3, 5, 90,D8, D6, 3, DO, ЗЕ 
s, 1,32, 1D, B0,32, 53, BO, C9 


E J スト 2 MEGALOT BASIC リス F 000000077000 


340 RERDR :READB : IFR=9THEN329 
350 IF А-1 THENGOSUB329 : SOUNDO :FORC=gT 
050 :NEXT :RE TURN 

360 SOUND1,858,15:FORCZOTOB :NEXT :GOTO340 


370 SOUNDA :FORC-QTOB :NEXT :GOT0349 

380 DRTR349, 20,0, 20, 349, 20,392, 20,349, 
20,0, 20, 392, 20,0, 20, 440, 20, 392, 20, 440, 
30,0, 20, 392, 20, 330, 20, 262, 50, 294,30, 1, 
@ 

390 SCREENI,1:CLS:COLORI1; S:PRINT 

400 PRINT" THE TINY SHOOTING GAM 
E" :PRINT:PRINT :PRINT 

410 PRINT"M M ЕЕЕЕ 666 ААА L 
ВАДИ 

420 PRINT"MM ММ E 

0 0 T 

430 PRINT"M M M EEE 

0:-0 Т 

440 PRINT"M МЕ 

0.0 I 

450 PRINT"H "n E 

0 0 42) 

460 PRINT" を を を も “GGG: ^ A 

00 T 

420 PRINT:PRINT :PRINT :PRINT 

480 PRINT" ВЕАМ-ЅРАЅЕ KEY от J-STICK 
BUTTON 

490 PRINT :PRINT" 
J-STICK 

500 PRINT 

910 PRINT:PRINT" 
EY TO START. ":PRINT 
920 PRINT" 

YOL9" 

530 IF INKEY$«4»""THENRETLIRN 


MOUE-CURSOR KEY or 


PUSH CR K 


GOOD LUCK TO 


. 940 IF STRIGC124»0 THEN RETURN 


550 CURSOR 34,290:PRINT" ":SOUND1; 800,5 
:SOUND9 : CURSOR 34, 20 :PRINT" ":GOTO 530 
960 RESTORE 570 :G0T0340 

570 DA^T8131,10,1472,10,165,190,185,10,16 
S5, 18, 175, 18, 196, 10, 175, 10,165, 10, 147, 1 
2,165, 18, 131, 199, 1 ,9 


エン ジン ルー ム の 質問 電話 や 編集 部 へ の 
質問 葉書 に は ,「 な ん と か の ゲー ム に は < 
グ が あり ませ ん か 7?7」 と いう も の が 数 多く 
あり ます . し か し , 掲載 され だ た リス ト に ババ 
グ が ある の か な い の か と いう 判断 は 大 変 難 
じ て 。 Sippo や "ТИЕ が だ うし "の よ 
う に 随分 後に な っ て よう や く バ グ が 発覚 す 
る こと も ある の で す . 

そこ で , 実際 に 入力 し た 読者 の 方 か ら 
「 動 いた 」 と いう 情報 を いた だ き , 動く こ 
と (パグ カカ が ない こと) が 確認 きれ た だ プロ グラ 
ム 名 を 掲載 し よう と いう ユー ナー を 設立 し 
EER. 

バグ が 出 て いな いか 監視 する コー ナー, 
名付け て Bug レーダ ゲー C3. 

また この コー ナー で は 。 マイ ュ ン 大 人 生 
相談 室 な ど に 送ら れ て くる 「 動 きま せん 」 
の 質問 に 対し て も , 原因 の わか る も の は 誌 
上 デバ ッ グ を し て 。 実際 に どの よう に ディ メ バ 
ッ グ する の か アド バイ ス し て いき だ いと 思 
いま す . [P] 
Йй 0275 BRA 

編集 部 へ の 投稿 の 際 ( 特 に PiOPiO) 12, 
も し 何 か の プロ グラ ム を 打ち 込ん で 動い た 
も の が あれ は ば, その タイ トル 名 を 原稿 の 隅 
に で も 書い て くだ さい . 編集 部 で は これ を 
基 に 動い た か どう か の 確認 を 行ない だ いと 
思い ます . ご 協力 を お 願い し ます . 
ENGINES DL АБАЛ RR асу ил ы ABOUT MERDA DINE 

これ まで の パグ あり プロ グラ ム 

今月 で は まだ 動い た と いう 情報 を 掲載 で 
き な い の で , その 反対 の デバ バッグ の あっ た だ た 


プロ グラ ム と その デバ ッ グ の 載っ た 号 を 表 
に に そま ます . 


誌上 デ 


先日 , PiO 1 A 30 "THE CLIMBER” 
を 入力 し て 実行 させ まし た .。 し か L, 
"Out of DATA in 240" と 表示 され た の で , 
初期 設定 の 段階 で の エラ ー だ な と 思い , 
330 行 の DATA 文 を 点検 し な お し まし た . 
念 の た め 全 DATA 文 も 点検 し まし た . し か 
L, 今 で も "Out of DATA in 240" 表示 の 
ътт, 

西宮 市 青木 義明 

この ケー ス で は Out of DATA で すか ら 。 
EE な 原因 は 次 の うち の どれ か で す . 
@⑯DATA 文 中 の デー タ の 数 が 足り な い . 
@ 必 要 以 上 に READ 文 が ある . 
⑯RESTORE 文 が 正しく 指定 され て な い . 

ゆ の 場合 は 具体 的 に は ,. デー タ の 区 切 5 
ӘСІ ТЕН (ビザ オド) た な っ て 
いる 場合 な ど が 考え られ ます . @ の 場合 は , 
FOR 一 NEXXT 文 の 変数 が 多く な っ て し ま 
っ て いる だめ, 必要 以上 に FOR~-NEXT 
文中 の READ 文 を 実行 し て いる こと が 考 


和敬 え る 新 コ ー ナ ー 


「 バ が ある の で は P」 そ ん な 読者 


CORSI 


PiO デ ベ バッグ 記 事 一 覧 表 


| テバ ッ ク 内 容 
掲 $k = 18 $k = | 

| | タイ トル 名 掲載 号 | 掲載 買 
PIT IN 
スロ ッ ト マ シン 
COMBAT WARS 
タイ ム ・ ト ラベ ル 
DOUGHNUT FISHING 
CRAB PLANET 
モニ タ ・ あ ら か る と oc 


汚れ た 英雄 
PB-CLIMBER 
Snake Town 


an BATTLE FIELD 


SNAKE & ALIEN 
3D STAR FIGHTER 
LABYLINTH MONOLITH 
Mr. YO RR 700 
N.H GOLF 
JOKER 
z g | F-BOAT 
アタ ッ ク ・ イ ン ベ ペー ダー 


[101 GHOST HOUSE 


Burglar Adventure 
167 | THE GURDIAN 
APPLE & ALIEN 


~y 
N 


94 


MOBILE VEHICLE 40 
SLOT MACHINE 76 
RIGEL 96 


えら れ ま す . の 場合 は , DATA 文 が プ 
クラ の に 中 の "いな も 所 に あっ で て 。 
RESTORE 文 の 指定 が 間違っ て いる こと 

ザ ・ ク ライ マー の リス ト を 見 る L, 130 
行 に RESTORE 1840 が あっ て , KD, 
FOR 一 NE 区 T 文 で 200 個 の デー タ を 読ん で 
いま す . そし て 問題 の 240 行 に 来る 前 に 230 
行 の ON RO GOSUB 廊 で 分 岐 し て いま す . 
ちな み に , この と き READ 文 で 読む で き ポ 
イン タ は 1960 行 か ら 後 の データ を 指し て い 
EX. 

210 行 を 見 る と RO=1 の 設定 を し て いま 
+. ON RO GOSUB で , RO= ニ 1 の と き は 
最初 の 930 行 へ サブルーチン ・ ユ コー ル し ま 
7. 930 行 を 見 る L, RESTOR 1520: 
RETURN と な っ て いま す . ここ で 
READ 文 で 読む で き DATA 文 の ポイ ンタ 
は 1520 行 に な っ て いる は ず で すね . 

© C, 240 行 に は READ 文 が 2 つ あ り ま 


掲載 号 | 掲載 頁 | 


ЕТІСТІ! — |? | s| 
Snake Zone 7 — 
SATAN 7 қ 
% LY ` 
バツ ンプ 


| テバ ッ ク 内 容 
タイ トル 名 掲載 号 BRA 


POM POM 

SUPER SPACE MOUSE 
TAPPY 

ザ ・ 石 仏 ア ド ベ ンチ ャ ー 
Dark Castle 

PALTEN KILTEN 


ELT 


走れ そん くん 
Jumping Mouse 
BLUE VENUS 
オォ オリンピック ゲー ム 
PC-1350 の 解析 
CRAZY UFO 
7 


5 
NUMBER ATTACK 
BLUE VENUS 


BATTLE FIELD 
Suffocation 
0—400m GAME 


PACI'N CHEIS 
文字 当て ゲー ム 
ASTEROID 
7 並べ 
KEY HOUSE 


Sippo 
127 


THE ぶた うし 

ゼラ ー ト ル 
THE WARGOCCO TANK BATTLE 

Т. どちら か の READ 文 で エラ ー が 出 て 

いる わけ で すか ら , 考え られ る 原因 は 2 つ 

あり ます . 

@230 行 の ON RO GOSUB 文 の RO が ゼロ 

に だ な っ そい を る . 

1520 行 の 最初 の デー タ の 内 容 が 正しく な 

い . 

Qiii, ON RO GOSUB の RO の 値 が 0 で 
ある と , 930 行 に サブ ルーチン ・ コ ユール せ ` 
ず 240 行 が 実行 きれ る た め , RESTORE 
1520 が 行なわ れず , READ KK で 読む べき 
デー タダ が な く て エラ ー に な っ て いる の で すす 。、 

は READ K で 読ん だ 数 値 が 正常 値 ょ 
り 大 きく な っ て いる ため, 次 の FOR 一 
NEXT の ルー プ が 必要 以上 に 大 きぐ な っ 
て しまい,。 READ XX, ҮҮ, EE で エラ 
—»5u 0-5 OTT. 

結論 と し て , エラ ー の 原因 は @ の な ため だ 
と 思い ます . た ぶん 210 行 と 230 行 の RO が 。 
どちら か か が RO な ど に な っ て いる の だ と 思い 
id, な ぜ , @ 和 で は な いと 思っ た だ た のか, Z 
の 理由 は 皆さん それ ぞ れ 考え て みて くだ さき 
い . 


| 
PD 


Tug 


Қ» 
ox 


M 5 の 高速 処理 に か か せな い ス プラ イト 
TTH, 1 つの スプ ライ ト に 1 色 し か 指定 
で きま せん . し か し , 2 枚 重 ね る こと に よ 
эт, きれ いな キャ ラク タ を 作る こと が で 
きま す が 。 今 まで の ツー ル や P-EDITOR で 
(à, デー タ を 表示 する こと は お ろか バ パター 
ン を 表示 する こと も で きま せん . 

ест, 2 色 指 定 で きる よう に し 。 使い 


や すさ を 追及 し た の が この S-EDITOR で す . 


<Y F EË 


『… テ スト ・ バ パタ ー ン 表示 
F ‘3% ター ン 定 義 ・ 記 憶 
p… デ リー ト 
E…BASIC 変 換 に 移る 
p 拡大 画面 を クリ ア す る 
s: 522 
… 男 面 全体 の 色 を 指定 す 
1… よ の フラ イ OE 
ЮА ОА. ҺЕ СНЕ 
ROG EET 


13 Print "ШШЩ": =+ ch r idi" S 

%С15»,СС1»>15,1521Х«4:Үз06: па? 2 

console 1.1 

28 input "MODE?",SE 

30 it ESE or 5Е>2 t^en Print 

"0" ғ9070° 2B 

ӘЙ с15:90=0Ь 478 

s Or I$ t6 S'Print cursor! 

4,1)ysrot+*(16, "A" next 

58 for Ісй to SiPrint cursartz2 

q.:IDBtvePt$CO."gM3I'"o:next:loc 0 to 

9 お さき 32 ます の P СЫЗ 288.12*'0c) s 

to 168.88 

fU N OOF 21.2'mPrint03;2»:"12 

Oe" 

S0 locate 215»?7'mPrintí8,425:" 
Бер. E this ¢ け こ さしすせそ た 

" 

90 “оға Is0 to 2555stchr.rPts$t5 

."Ba8"5»to I,;3:stchr nats EBS 

)to І.білех? 

1080. fart. Jz8 to V steP.2tfor. [= 

8 fO 91 £t» 2 

118 UBZ&ZRBAB-ITIS*32 

128 уроке ОЯ, СЯ: џРоОКе UR+Z2, CR 

*tl:uPoke UR+1;CR+2:3upoke 170452 

> Сй+$ 

i38 CR=CR+4inext I.J 

148 ヨロ ミニ リロ 440 

150 IVfzinkeuw$:IE-sinkeuti1»5 

160 1f IMV$252"t" 5p T $654 QI 

V$z"c-" then XzX-1 

ITE іс ТҮжете QF I9S$5s" төен 

y$£$z"—" then XsxXx*1 

188 410 IV$2z"Q'..or IV$s"^".5r I 

үш ы then = テリ ー1 

やき 


り ま = リル" then ツリ = リ +1 
288 Х-Х%(Х-20)-(Х-3):Ү-У%СҮз16 


ュー ミー1 1 


218 if IY$="c" then 30sub 448 
220 if IEz4 then Print cursorc« 
Vos "O":DCB X-4, V» 21:0C1. 4-4. 


Vh=B:qoto 3580 
230 if ІЕ=1 and SE=2 then Prin 
E 


t cursorCX Vo s "é":0C1. 4-4. YD = 

іГсЙй,х-4.Ұ)»шИ 4о0%0 55а 

240 if IESS8 оғ IV$s"z" then Pr 
int суғзогсх, V» SECC X-4, Y) 
-ü:Céi.X-4.V)-0:90to 350 ` 

258 if IV$-"f" then 9osub 370: 
gosub 63:3oto 358 

260 if IV$2"g3" then 0=1-0:ма9 

で エロ 5 ヨロ トロ 350 

地学 あっ 性 信 用 905Hb. ЖОЙ 
Joto 358 | 

290 it. IY$s"i1".ihen.5Cs1itgosub 


М:--МАСЖЧЯ(2 L 3) 

ZZ… ド ッ ト の 消去 

T) em Z — ` л DFE) 
左 SHIFT:…ー 上 ス フ ラ イト の 着色 
CTRL:… 下 ス フ ' ラ イト の 着色 


便 い 方 


まず 画面 の 説明 で す が ,。 М5 の キー の よ 
5 な 形 が 16x16 に 並ん び だ の が 抜 大 画面 , そ 
の 横 の 3 つが 現在 の 色 の 表示 で , 1 が 上 の 
жара А-А, 243 0232724 bu ХӘН 
景 の 色 で す . 

背景 の 色 指 定 を 付け た の は , 色 の に じみ 
具合 を 見 る ただ め です. その 横 の 大 き な 正 方 
形 は テス ト ・ バ パタ ー ン の 表示 エリ ア で , 4 
の 下 の カ ラー バー は 各種 色 指 定 に 使い ます 

プロ グラ ム を 実行 する と, モー ド を 聞い 
て きま す .。 スプ ライ k 1 校 の ゆみ の と き は 1} 
を , 2 枚 の と き は 2 を 入力 し , 
キー を 押し て くだ る きい. 

各種 色 指 定 を を すると, カー ソル が カラ ー 
y S-EDITOR BASIC) ZF | 


(n 
a 


H A H cn H сч 
«D 
Cr O г O Һә Ca 
cto Ш 


Жү] 


O O v cu» O à СШ. 
i£ 


iA C) F3 
Ш 


тал 
242 


CA 


fa 4 ta £n rn £m гш 
( ух] 


C4 C4 C4‏ ل 


DUI 
бә i 


T 


іл co 
-- |T] ~ 


£4 CA 
< e = の + ¢ 
Lo © 


Жады 


w 


X 


ж! 
CA 
n 
D oe ~ 


£4 ж C4 GO 
о c 


D 
бз + 
ペン 


„г 
x ا‎ 


br RO: 
Hoe Il 


Bof 
au 


R9 F2 > D 
D 


< 
ا 


ا 
йй UT oe‏ 


—+ c+ by GD d 


E. 
19 


Pi = 
ma 25 
ғ 
еы 


b 
ж% 


c < 
ч 
mi 


4 


“ро. 


EJ 
g 


+ 
T 


15:Pr 
езіп 
SE*4- 


rinek 


in * 
бр з 


LI 
s и] 


qf 


| 2 
に すさ す tf (D oe 


чт 


U кюз 


n a 
aca) А гои 


+ u 


"£t88288802303803132" 


"fransasaszasas1! 


пә (р 48 
ve. a 


[x] 
сф u 
= 


"¿BIAI 


ua o 
1 бол oy rn dà 


LO 
<+ 
= 


"POLO 


оз 
C 


Do xz dm oz 
a 
+ ( 


+ (Л 
ка D 


C н 
гі 

и] 

m 

сә 


7% 


H ل“‎ t os 
о 
о 


“ал” 
oO 


x 


m 
іші 
[io 


290180, 
1880; 1 


っ ت‎ D tu 
++ 
к> dE) 7c gone 2 


C C. = + 
є— (и 

©з oct 
= ш x 
а 3 
C GO s. H 
к GC) p 
ай e RN 


11 
T 
54 
š 
イィ 
* 
H 
Ë 
EE 
> 
1 
» 
s 
% 


バー の と ころ に 表示 きれ る の で , 好み の 色 
の と ころ まげ 移動 し ,|5 | キー を 押し て くだ 


さい 、. 


ВАВІС»- ЯНА 


[E] キー を 押す と な に や ら 廊 が 出 て き て , 


カー ソル ・ マ ー ク が 出 ま す . それ か ら 。 Z 


ザー 音 が 鳴る まで |RETURN| キー を 押し っ 


ぱな し の 状態 に し て くだ さい . プ ブザー 音 が 
167-65, リセ ッ ト し て リス ト 見 て で 。 Ж 
分 な DATA 文 以外 の リス ト を DEL 文 で 消し 


て くだ さい これ て a. E UB ê 


プロ グラ ム 作 成 に あたっ て 


ぼく は , ゲー ム な ど を 作る と き , 必要 な 
ツー ル を 作っ て か ら 行 な いま す . これ も を 
の 1 つ で す が , や は り 必 要 な ツー ル を 作っ 
Ch oh ENIMS きれ いで 素早 
〈 作れ ます ね . 皆さん も いろ いろ な ツー ル 
を 作っ て くだ さる ん 


ー1 > 
"P1sVitCIV$e" "y= IVER 
+¿Y1=2)-(¥1=-1? 
ос 3 to X1#8+168;Y1%*16 
"1 ます 史 1 
if IV$sS"gz" then 
À. 66G: 670,630 els 
a.cL:color 
8,"10"»5to 88 
scol TRENT 
t$c8.,"10"5t10 &82 
colar ias, CLIENIST 
FPOtS$c8."10"5t10 
1948. "10" 10 ZEO, rety 
б CLTT")etuennü 
m 
NN Ісй to SE*4-1:R$-2rdchr 
; :ztchr R$ to Яр+І. 5: пех? 
Boot ср А HR SET EE ORA 
d return 
Print SONS SA 
*4d-1:20$2rdchr$cI.8H 
»:8$::n 


. 
^o ^ - 
220» 72? ! f L 


ceu ° 
YS 0 5€ Qo P. Ç C 
ғ 9 v< бо ip б 
© 
о 


Qa LC @ 
"202 n > 


“ の сал 
x сг % 


u 


2 


ы = 
чо 00 a は 


=』 im 


n NE. 
ba pa CO 


o QC 


kw 
хя 


ー ュ 


Б. 
g 


Joto 748 


D ат, ¿n 
Ca OD e ax 
` 2 ` 
e TT +. 
a 


"do 29 
2x 


4 
Do C 


M 5 е 
ді c 
істі 


[кх Кл] 
C v. gm ox 


bi m 
сә 


e, 
EX 


تا u‏ تن 
Do 45‏ 
m‏ 


[A 

Don 
ae 

NU IM. 


= 


s OG Cu 0 К 
an 
OR — Ci 
[кх] 


е (саз 


` 
ITI 9 s u 
Ë + 


* 
+. oh 


141 


PC-6000 シ ジ シリーズ _ 


マシ ン 語 


園山 脇 利夫 


PIO 2 号 で 掲載 され た “モニタ” の 
リロ ケー タ が で きま し た . これ を 使え ば 
E モ ニタ を 任意 の アド レス に 設定 で きる よ 
うに な り ま すず す 。 


特徴 


⑨ プ ログ ラム 全体 (EE モ ニタ を 含む ) を 1 — 
の BASIC プ ログ ラム と し て 扱う の で 。 1 
回 の ロー ド だ け で OK. 

リロ ケー ト は 256 バ イト 単位 で 行なう . 

マー ク I の モー ド 5 へ の 変更 も 自動 的 に 
行なう . 

16K で も 32K で も 使用 可能 で ある . 


プロ グラ ム の 作り 万 


PC-6001 で は ROM&RAM カ ー ト リッ ジ 
を 抜き , マー ク II で は モー ド 1 を 選ん で 16 
氏 シ ステ ム に し ます . ペー ジ 数 を 1 に し て E 
モニ タ を 起動 きせ ます . ! 
DELFT k) コマ ンド を 使い , ブロ グラ 

ムリ スト の C400H ロ 一 C542H 番 地 , お よび 

CF42H 一 CFC7H 番 地 を 入力 し ます . 

@ て T (転送 ) コマ ンド を 使い , E モ ニタ 自身 

(F000H —F9FEH # 1%) を C543H ~ CF41 

HH 番地 に 転送 し ます (つま 5 TFOOO, F9 

FE, C543|RETURN| と キー イン する ). 
@⑧E モ E ュ マンド を 使い , FF56 有 H 番 地 を C7H, 

FF57H 番 地 を CFH に 変更 し ます . 
@⑳BASIC に 戻り , CSAVE で プロ グラ ム を 

セー し ます 。 ファ イル 名 は 。。 POEt 

で らい が いい て も よう: 

以上 で 完了 で す . よく 読ん で 手順 を 間 違 
Ара ОЗАТА ОС C a А, 


RI メモ リ ・ サ イズ と ペー ジ 数 に 
よる 指定 可能 アド レス 表 


16K シ ステ ム 32K シ ステ ム 


C600H—F000H | 8600H-—-F000H 
C600H--D600H | 8600H—-D600H 


ACRO 


X2 コマ ンド 一 覧 表 n,n1,n2, は 16 進 数 .、F$ お は ファ イル ・ ネ ー ム . ( ) 内 は 省略 可 . 


Ew b 


E 式 
A (nl) (,n2) 
AP (nl) (,n2) 


| (пі) (,n2) 
DP (nl) (,n2) 
DS (nl) (,n2) 


n 1 か ら n 2 まで の メモ リ 内 容 を ASCII 形 式 で 出力 し ます . A の あと に 
P を 付け る と プリ ンタ に も 出力 し ます . 


モニ タ か ら BASIC の コマ ンド 待ち に な り ま す . 

n1 か ら n 2 まで の メモ リ 内 容 を 表示 し ます . この と き 縦 横 の チェ ッ ク 
サム も 出力 し ます . D の あと に P を 付け る と プリ ンタ 出力 , S を 付け る 
と 縦 サ ム の 出る 1 ブロック ご と に 一 時 停止 し ます . 


n か ら メ モリ の スク リー ン ・ エ ディ ッ ト を 行ない ます (詳細 は 表 3). 


[ume | men созчу US CARLES. 


レジ スタ を X コマ ンド て 設定 し た 値 に セッ ト し て n 番 地 に 飛び ます . R 
ET 命令 が ある と PC 以外 の レジ スタ の その 時 の 状態 を 記録 し て 戻り ます . 
RST 38H( オ プ ジ ェ クト ・ コ ー ド 0FFH) が ある と そこ が プレ ー ク ・ ポ ボ ポイ 
ント に な り 戻 り ま す . 詳し く は プレ ー ク ・ ポ イン ト の 項 を 見 て くだ さい . 


L( : F$) 
L6( : F$) 


S: F$,nl,n2 
S6 : F$,nl,n2 


S コ マン ド や |I/O の 各 モ ニタ で セー プ し た も の を ロー ド し ます . ファ イル 
名 を 付け る と スキ ッ プ な ども し , また し の あと に 6 を 付け る と 600 ボ ー 
で セー プ さ れ た も の が 読み 込め ます . 


n 1 か ら n2 の メモ リ 内 容 を ファ イル ・ ネ ー ム F$ を 付け て セー ブ し ます . 
S の あと に 6 を 付け る と 600 ボ ー で セー プ し ます . F$ は 6 文字 目 ま で 有 
効 で 7 文字 目 か ら は 無視 され ます . 


n 1 から n2 ま で の メモ リ 内 容 を n か ら に 転送 し ます . 転送 前 と 転送 先 の 
アド レス が 重なっ て も 大 丈夫 で す . 


テー プ の 内 容 と メモ リ の 内 容 を 比較 し ます . 不一致 の 時 は その 番地 と テ 
ー プ の 内 容 を 表示 し て エラ ー に な り ま す . 他 の 不都合 が 生じ た 時 は エラ 
ー の み に な り 区 別 で きま す . 使用 法 は し に 準じ ます . 


LR 以外 の 全 レ ジス タ の 内 容 を 表示 し , また 変更 し ます . 各 レ ジス タ 名 の 
あと に 16 進 4 桁 を た 入 れる と その 値 に セッ ト さ れ ま す . また [SPACE| キー 
で 次 の レジ スタ , [DEL] で 前 の レジ スタ に 移り , [STOP] で 終了 し ます . 
な お PC の 値 は 変更 で きま せん . 


*A, D, E に お いて , アド レス は 行 の 先頭 の 最 下 位 桁 が 0 また は 8 に な る よう に 補正 し て か ら 表 示し ます . š 
た アド レス を 略し た と き は , 前 の 終了 アド レス か ら 表 示し 始め ます . 


使用 法 


以上 の よう に し て 析 っ た デ ロ グ タム を ちら 
ー ド L, 走らせ (RUN) ます . す る と スタ 
ー ト ・ ア ドレ ス を 聞い て くる の で , モニ タ 
を 置く 先頭 番地 を 入力 し ます . ここ で | RET 
URN | だ け を 押す と , 先頭 は F000 有 H 番 地 と 
o Wd», 入力 可能 な アド レス ( 表 1) 以 
外 の と き は 再 入 力 状態 に な り ま す . 

こう し て 指定 きれ だ アド レス に リロ ケー 
ト を 行ない , 自動 的 に CLEAR 命令 を 実行 
し て "Ok" が 出 ま す . この と き 文 字 領 域 は 
50 文 字 分 , ユー ザー エリ ア の 下限 は モニ タ 
の 先頭 番地 に な り ま す . 


あと は 指定 し だ 先頭 番地 に EXEC 命 令 で 
実行 を 移せ ば , E モ ニタ が 起動 きれ ます . 


モニ タ の 
траје 


も と も と E モ ニタ は 1 ペー ジ 用 に 作ら れ 
で て ぃ い だ だ た ゆめ だ : だ も DUPAGE 
起動 と 同時 に 1 ペー ジ に 設定 し 直し て いま 
bx 

し か し リロ ケー ト 可 能 と な っ た 現在 , こ 
の 機能 は 返っ て 邪魔 な も の に な っ て し まい 
まし も だ. そこ で これ を 実行 し て いる BISE 
ーFI1F3H 番 地 の 5 バ イト を すべ て 00H で て で 
埋め て くだ さい 。 これ に は ブロ グラ ム の 作り 


> 初め まし て , 僕 は 間 上 ら ぼ さん の ファ ン な ん で すけ ど , と ある マイ コン 誌 で ら ぼ さん の イラ スト が 載っ て いま し た . そこ で 私 は 一 言 ら ぼ き 
ら ぼ さる さん, PiO と 僕たち ら ぼ きる ん の ファ ン だ け の も の に な っ て ほし い の で す . それ だ け 言 いた か っ だ の で す …-. 


( 間 上 ら ぼ さん が どん な 人 か 想像 し つつ ゲー ム を する 菅野 勇 ) 


方 めで 転送 する 前 に ビ コ マ ンド で 00H に し て 
95%), まだ は 転送 後 上 記 ア ドレ ス に 対応 
4 $C732H —C736H *00H THD 22» С 
t|. 

1 ペー ジ に 設定 され て も いい 人 は 以上 の 
操作 は 不要 で す . 


に 


リロ ゲー 久 は どう で し だ か が... 本当は も っ 
と 早く 発表 し だ か っ だ の で す が 。 いろ いろ 
FE Lie а 45% 22” $t 
も 私 は ROM 版 を 使っ て いて リロ ケー ト の 必 
要 が な か っ だ の で す が 。 どう し て も この あ 
だ り に 大 き な 大 き な 原 因 が あっ だ よう で す . 
すみ ませ ん . 

し か し 私 が E モ ニタ を 発表 し た と き の 本 
当 の 目的 …PC-6001 に も 縦横 サム を ./ と い 
зорак, うれ し で 思い ます 

それ で は E モ ニタ を 愛用 し て くだ きる っ て 
いる 皆様 。 る きよ うな ら 。. 


ヒモ ニタ に つい て 


E モ ニタ は PiO2 号 で 掲載 し た PC-6001 用 
の エディ タ 機 能 に 優れ た モニ タ で す . 2 号 
を 持っ て いな い 人 の だ め に , リス ト 3 に E 
モー ニタ 本 体 を 掲載 し て お きま す . 

マン ド に つい て は 家 2。 
eu. 


3 を 見 で てく 〈 く だ 


i] 
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表 3 エディ タ で 使用 で きる コマ ンド 一 覧 


mg リス ト 1 ヒモ ニタ 用 リロ ケー タマ シン 語 リ スト 


Sum: 


CSO 
свов 
Св19 
CS18 


[ESC] を 押す と カー ル 位 置 の 1 バイ ト に “"@" マ ー ク が 表示 され る の て で 続い て 好き 
な キー を 押す と , その ASCII コ ー ド が 書き 込ま れ ま す . た と えば A を 押す と その 1 
バイ ト は 41H に な り ま す . ° @ "の 解除 は も う 一 度 [ESC | を 押し ます . 


ー ソ ル を ホー ム 位 置 に 移動 し ます . 


カー ソル を 行 の 先頭 に 移動 し ます . 


エディ タ か ら 抜 け , モニ タ の コマ ンド 待ち に 戻り ます . 


画面 全体 を スク ロー ル ・ ア ッ プ し ます . 


画面 全体 を スク ロー ル ・ ダ ウン し ます . 


ー ソ ル 位 置 に 0 を 入れ , 画面 の 最後 まで 1 桁 ず つ 右 に 移動 し ます . 画面 か ら 出 
$890 165NEL £T. 


画面 最後 の 1 桁 に 0 を 入れ , カー ソル 位置 まで 1 桁 ず つ 左 に 移動 し ます . カー 
ル 位 置 の 1 桁 は 消滅 し ます . 


メモ リ ・ ダ ンプ と 共に その ASCII 出 力 を 表示 する か し な いか を 切り 換え ます . 
れ は 1 バイ ト の 区 切り の スペ ー ス 部 分 に 色 を 変え て 表示 する と いう 画 期 的 な 方 法 
を 用 いて いま す . し か し その た め 画 面 が 繁 雑 に な る の で , これ を 実行 する た びに 
表示 ・ 未 表示 を 交互 に 切り 換え る よう に し まし た . i 


ー ソ ル 位 置 以後 。 画面 の 最後 まで カー ソル 位置 と 同じ 値 に し ます . 


画面 を 次 の ペー ジ に 切り 換え ます . た と えば 今 A000--A07F ま で 表示 し て いた と 
する と , 次 の IA080--A0FF ま で の 表示 に 変わ り ま す . 


右端 の チェ ッ ク サ ム を アド レス 加算 の も の と 不 加算 の も の と 交互 に 切り 変え ま 
3. 加算 の と き は 区 切り を “/" TRL, 不 加算 の と き は ":" で 示す の で すぐ 
わか り ま す . また , これ で 最後 に 設定 し た 状態 は , モニ タ の D コ マン ド で も 保持 され ます 


うど [CTRL| + [N の 逆 で す . 


か な イン ジ ケ ー タ が 点灯 し た 状態 で テン ・ キ ー の よう な 配列 が 使え ます . な お こ 
の モー ド 中 +[ | の コマ ンド は 使え な い の で , 使い た いと き は 一 度 [か な | 
キー を 押し て この モー ド を 抜け て か ら 実 行 し ます . 


画面 を 上 の ペー ジ に 切り 換え ます . ちょ 


ー ソ ル を 好き な 位置 に 動か し ます . カー 


の 頁 に 切り 換わり ます . 
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53 Қау 
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626 


3E: A3 
Fo: 28 
Е9: АС 
В9:79 


33 dide 


ソル が 画面 の 外 に 出る と , 自動 的 に 隣 


m BHUAF2 E モ ニタ 用 リロ ケー タマ シン 語 リス ト 議 
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pi 


ІЛ АКЗ E モ ニタ 本 体 
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PiO に 載る マシ ン 語 ゲー ム を すべ て DM 
A OFF に し て も ら お うと 思い , 発 表し ます . 
これ は , グラ フィ ッ ク RAM に 背景 と 重ね 合 
わせ て , 中 間 色 の 文字 を 表示 する サブ ルー 


人 入力 方法 


アデ ド レス は B 000H 一 B3DFH で す . リス 
ト 1 を 間違え な いよ うに 入力 し て 《 だ る ん 
リス ト 2 は メイ ン 部 の ソー ス ・ リ スト な の 
С, リロ ケー ト す る と き の 参 考 に し て 〈《 だ 
きい (入力 する 必要 は あり ませ ん ). 


は 必ず " 


この ルー チン を CALL す < る と き 
り 込み 禁止 で な けれ ば な り ま せん . 
この ルー チン は 必ず IY に 文字 デー タ 先 頭 
アド レス , HL に G-RAM 表 示 ア ドレ ス , АС 


タイ ル ・ パ ター ン を セッ ト し て CALL し て く 
だ さい . G-RAM 表 示 ア ドレ ス は くれ で れ も 
間違え な いよ うに . 

この ルー チン を CALL す 5 ЕАЕ, ВС, D 
E は 破壊 きれ て し まい ます . IY は エン ド ・ 
マー ク の 次 の アド レス , HL は 表示 な た 次 
Ооу EFA A は を の まま で す . 

表示 は 完全 に 背景 と 重ね 合わ せ て いる の 


C, 一 度 文 字 を 表示 し だ た 上 に 表示 し て も 下 
の 文字 は 消え ませ ん の で あわ あしからず. 

IJ Z F 3 に 図 2 の ょ うに 画面 に 表示 する 
м 525 £T. 


プロ グラ ム は BO000 一 BOCCH て А qu 
アド レス は B000H で す . BOD0 一 BOD6H が 


ワー ク ・ エ リア , 残り の BOE0 一 B3DFH は 
グラ フィ ッ ク 文 字 デ ー タ の お まけ で す (0 一 
9。A 一 の 順 で 入っ て いま す ). 

B025H 一 は グラ フィ ッ ク 廊 字 デ ー タ の 先 
頭 ア だ ドレス を 表わし て いま す . プ ブロ グラ ム <* 
サイ ズ は ほとん ど 握 に し て いま せん . ЖЗ 
ん が 使う 場合 . 他 の アド レス へ 移し まし ょ 
2. 


プロ グラ ム を 他 ア ドレ ス に 移す と き の 注 


яғы ヴ ロ ダラ ム は と も か て で て 、 ダー デ 
は CO000H よ り 前 で な けれ ば な り ま せん . 

キャ ラク タ ・ コ ー ド は 上 位 4 ビッ ト と 下 
位 4 ビッ ト が 逆 に な り ま す (00H 一 01H 一 02 
H Z «00H—10H-20H t Z 2).00H —F 
FH ま で で す が EEH は エン ド ・ マ ー ク に な 
02 T. 

グラ フィ ッ ク ・ デ ー タ は 1 廊 字 16 バ イト 
C, zzzz 晶 から デ ー タ と する 場合 。 必ず キ 
ャ ラク タ ・ ユ コード 00H, 10H, 20H, … の 順 
に 連ね て くだ さい .255 廊 字 ま で 定義 で きま 
т», だ いだい 64 文 字 (1K バ イト 分 ) が 適 
人 
А, В, G a Х, Ү, 2 … の 順に 定義 す 
る の が いい と 思い ます . 

1 娘 字 は 16 ベ < メ 8 ド ッ ト に な り ま す が 。 8 
x 8 ドット と し て 中 間 色 を 出し て いま す の 
で 。 で きる だ け 8X 8 ドット ・ フ バターン で 
作る 方 が き 


れい に 中 間 色 が 出 ま す . 


b > これ きえ ぇ あれ ば . テキ スト 画面 な ん 


て 必要 な く な り ま し だ た ね. や っ か いな アト 


1: 2 NEPOS 


HIGH | SCORE 38H- 
HIT RETURN KEY QCH 


ZASHI 27H 


スタ ッ ク ・ ポ ボ ポイ ンタ (SP) 退 避 用 


G-RAM 表 示 ア ドレ ス 
グラ フィ ッ ク ・ デ ー タ ・ ア ドレ ス 
タイ ル ・ バ パタ ー ン 


リ ビ ュ ー ト も 関係 な いし , DMA OFF で オ 
ー ル ・ グ ラフ ィ ッ ク の 高速 ゲー ム が どん ど 
ん 出 て くる こと を 期待 し て いま す . 


РС= -8801 用 C- RAM 文 字 表示 サプリ ルー チン 
専用 スコ ュ コア 計 算 & 表 示 ル ルーチン で す .。 ゲー 
ム に 使う の だ か ら 少 し 基本 的 な スコ ア ・ ル 
ー チ ン な ど を と 思い 発表 し まし だ た (リスト 
4 ). 


スコ ア 計 算 ル ルー チン m 


プロ グラ ム は AF00 一 AF1BH で スタ ー ト ・ 
アド レス は AF00H で す . 桁 数 は 6 つ で 9999 
99 ま で 計算 で きま す (これ を 越え て も その 
+1), 


CALL す る と き は 。 BC に スコ ユア に 加え る 
得点 を 入れ て 〈 く だ さい . な た と えば ,756856 声 
(ここ で は スコ ユ コア は 10 直 単 位 た と し ます の 8 


実は 765 点 ) を 加え る と する と , BC に は 07 
65H と セッ ト す れ ば いい 訳 で す . 


スコ ア 表示 ルー チン иинин 


プロ グラ ム は AF20 一 AF54H で スタ ー ト ・ 


14S 


BO 


アド レス は AE20H で す . この ルー チン で は きい 。 AEF51H 一 は G-RAM 中 間 色 文字 表示 コー ド で 入っ て いる 必要 が あり ます . 
最後 に 0 を 付け 加え て , 10 点 単位 し し て い サ プ ブルー チン の スタ ー ト ・ ア ドレ ス で す . AFS8H か ら 8 バ イト は 表示 用 の バッ ファ 


まま CALL する と き は 。 НЫ СС-БАМ T: ・ C, ここ に は G-RAM 中 間 色 文字 表示 サブ 
PEN 2 に à ー ク е. RE : 5 
MJ DEA, DE に スコ アデ ア ・ ワ ー ク 先頭 アド 2 に つい て ルー チン て で 直接 扱え る 形 で デー タ が 入り ま 


紹 和 こし に は カラー コー ド ЕЖ k үст (уе АЕ55Н2' 53,14 кх 27 нт, BCD Ж; 


— c | リス ト 1 G-RAM 中 間 色 文字 表示 ルー チン マシ ン 語 リス F НЕ 
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BOZE SAD6E® A, (GSW4) B@67 B€ t BOA? ЗЕӨВ A68 


БӘСЕ EGOZ 3 BOLB € : BeAaB ов 651.5: AF „AF? 
BOZO 47 | Н,А BO69 € BOAC А, (DE) 
RG1 o7 ў LCA во&А 5 $ н EAD 5 В 
BO3S2 07 "uU BØSE Е.А BOAE- C.A 
BOZI во Ç : БӨ&С EDSED4EQ DE, (GSWZ) BOAF А, (DE) 
EO34 07 : B@7@ 2A4D2B6 HL., (GSW2) BeBo 

ROIS 97 Lc BO73 DXSD (SDH), A BOR1 (HL ) 
Bezó BO JR : BO75 3EO8 а, 8 BORZ? LRT -- 
Баз? o7 L.C Бо77 ов AF „AF? вов (HL ) A 
BOI8 47 BO78 1А А, (DE) BƏB4 13 DE 
Bop во OR E BO79 AG Б BOBS 23 HL 
BOZA 47 в,а БӨ7А 4F C. вов& А, (DE) 
BOZE EE DE HL. BO7E 1а а, (DE) BOR7 B 
BOSC SRD2BG HL, 6502) BO7C 2F š BORS С.й 
BezF DZ5C | (SCH) „A B@7D Ав BOE? А, (DE) 
E941 EG8 2 А, 8 Ee フ 7E E1 t вева 

Be4z ов E АЕ, АЕ? B@7F 77 ( BÖBE 

E944 1A A, (DE) BOBO 13 : EoBC 

Be45 до B BO81 22 BORD 

BO46 АҒ š с, а вов2 14 3 EOBE 

Ho47 1A ‚. ñ. (DE) веб ao : BORF 3 


О) (О; ЖАГЫНА 3 月 号 の 神 タ ケル さき ん, あお い Narumi る ん 本 当 に どう も あり が と う ご ざ いま し た っ つる それ か ら 遅 れ ば せな が ら 
QA Ол ГРО Ay TURE I Bod. 本 当 に うれ し か っ た ん で す ⑦ あ り が ほう ご ざい ます ググ 最近 に な っ て PiO 誌 上 メッ モー ジ な ど が 

い だ だ ける よう に な っ だ の で す が , これ が 目 に 付く た びに 大 喜び し ちゃ っ て ます . も う 何 と いっ て いい の か … う ーー む … と ,。 と に か く 本 当 に あ 
146 e り が と う ご ざ いま すみ (いっ つも これ し か 言え な く て ご めん な さい で す ) ( 3 日 後 私 立入 試 の の ん 気 な 間 上 ら ぼ ) 


pio 


ІЛ АК2 G-RAM 中 間 色 文字 表示 ルー チン ソー ス ・ リ スト 


весе ОВ AF „ AF? Бөрө OO | МОР ーー 
БӘСІ 3D ñ Bepi ос ° pone 
BGC2 2@E7 ` М2,6515 вор> өе es ⁄ i: 
BoC4 DS5F (5FH) , A вор ee Bo 
BOCS 1182FD DE, 6FD82H BoD4 ос で 
この か で まさ | HL, DE BeDS ee ; BOEG 
веса CZ0ABG ] BSL 1 EeD ら 6 

вер? 
БӘСІ оо っ верв 
BOCE eo y воро 
BecF eo s вера 


m リス ト づ つづ サン プル ・ プ ログ ラム ソー ス ・ リ スト 
ビビ OE FDá&EOO 
ded dede oe ae dede dec M xd c) vx x 


SAMPLE PROGRAM * 


“ 
ч 
. 
3 
" 
" 
" 
" 


BOO GSPUT: 


BAAG 
Бая? 


|: 
が 


“Ут 


LD A.X 54 23 HL 
LD (HL ) 。 99H 29-155 DE 
HL 56 1 の EF SCFL1 
a 3 (HL) 。 © 
{ NZ,SCAL АР 2 25 оу 
C9 SB Ë (HL) , ФЕЕН 
FD21588F IY,WSC2 
9 ロロ F で の H E1 "DP HL 
FS ^ 2 0605 Р в, 5 
ES АҒ 
2158ВАҒ HL, WSC2 : FDEEGOG 
әбес B,3 2005 
14 SCPL1* А, (DE) ly 
EóoFe GF eH に ご LNC HL 
(HL), À 2.2 HL... ^ 
SCFL2 
АҒ 
сроово ALL GSFUT 
C9 5 


Ез 322222522254 32 
E SCORE UTILITY * 
каза 25225522. 


BOGO 3GPUT: EQU  OROOGH 


HAF OOH 
AF@9 2157АЕ : HL, WSC1 +2 
AFO3 79 a.C 
АҒӘ4 86 ADD A, (HL) 
AF95 27 
AFO6 77 
AF07 2E 
AFOB 78 A,B 
aFe? ВЕ A, (HL) 
AFOA 27 
AFOB 77 (HL), A 
aFec 2E HL. 
AFOD 3EGG A,9 
АЕФЕ BE А, (HL) 
AF19 27 
AF 1 1 (HL), Á 
AF12 : NC 


aFio 
АЕЗ1 5 әғән 
T (HL), A 


ペペ ンク クア 


福島 市 ナイ コン 東京 都 あ た に よし まさ 東京 都 NECC 東京 都 本 竹 雅人 
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PiD な 人 の 


L... B E 
«4 S 


ic, つい に 私 ガザ フリー トーク を 書く ここ 
と に な つて し まい まし だ . Sosa 


Ост 


ある と き は プロ グラ ママ 伝説 阪 神 ,。 まだ た あ 
る と き は 不屈 の 男 テ シル: トヨダ, し か し て 
を の 実 越 は …1 に マイ オイ ュ コン, 2 に SF。 3, 
4 が な く て ,。 5 に 麻雀 と , どこ に も 勉強 と 
いう 言葉 の 入る 余地 が な い 恐 る べき 高校 2 
年 生 (これ が 載る ころ に は 多分 ? 3 年 生 ) 
な の で あり ます . 

コン ピュ ー タ に 興味 を 持っ だ た の が 小学 校 
4 年生 の と き で し た だ . 中学 に 入っ て , 当時 
全盛 期 の PC-8001 を 親 に ね だ っ て 購入 し て 
も らい (悪い 息子 で す な ), BASIC で ゲー 
ム ば っ か り 作 っ と り ま し た ( 今 で も ゲー ム 
ば っ か り で す が …)。 マ シン 語 で プロ グラ 
ム が 組め る よう に な っ だ の は 高校 に 入っ て 
か ら で す . ちな み に 現 在 , CAP-X t СО 
勉強 中 で す が , 本 格 的 に は 大 学 に 入っ て か 
Йй кй б ай 2, СЫ, BEDE 
し て マシ ン 語 を 使え る よう に な っ だ の か …・. 


wg - - D 

2 シン 語 習 得 法 

現在 の パパ ソコ ン ・ ホ ビー スト を 大 別 す る 
5, 次 の よさ うに な る と 思い ます 。 
W マ シン 語 で ブロ グラ ム の 組め る 人 
OWICS, コン パイ ラ な ど で プ ログ ラム 
の 組め る 人 
BASIC で プロ グラ ム を 組め る よう に な 
っ だ の で , マシ ン 語 の 勉強 を 始め て いる 
人 
⑯BASIC は 覚え を た けど プロ グラ ム の 組め 
へ な い 人 

оша бады qi 
| w i= б» Желш» も いま ずる 
QED £ (OOM DTH 
| AT > 5i. BASIC つ マシ ン 語 と いう 
NM 条 に つい て は いろ いろ と 是非 が 論じ られ 
[АКС EO 私 は ベス ト だ し 思い ます . と 
ング 恥 っ つき や すい で すか ら . ここ で は W, Фо 
gz に 私 の と っ た コー ス を お 教え し まし ょ 


dai 


* 


何と な く ゲー ム ら し き 
Сізезілг, あと は 


Wa マシ ン 語 と な る と, 

Jb ++. これ ば か 
0 し か 書き よう が あ 
ЕН TD CX 


ne, 
к v 


FneeTalk 


я 

o e iue 
が この よう な お 場 に 出 て も よい も の か と いう 
"Ue tSOXUSJZ 果 だ し て これ が 安さ 


で きだ マシ ン 語 の 解説 書 が 多く 出回っ て い 
ます の で , 書店 で 粘っ て 自分 の 機種 や フィ 
ー リ ング に 合っ だ も の を 見 つけ る こと が 大 
事 だ と 思い ます 。 

さる て, マシ ン 語 の 概念 を よう や くつ か ん 
だ も の の , 実際 の プロ グラ ミン グ は な か な 
pexvoelASSUUCcuUr5.o*E515 
人 は と に か く 何 か が か が プ ログ ラム を 1 つ (で き 
れ ば ゲー ム を 1 つ ) 作っ て みる こと で す 。 
私 が その 状態 に あっ た とき は コン ピュ ー タ 
が あま り 面 白 じ も の と は 思え を なくなり , し 
ば ぱら 《 グ ラッ シク が あり まし た ところが 
知る 人 ぞ 知 る 「SUPERLANDER」 の PiO 
採用 が 決ま より, それ な ら と る ら に マシ ン 語 
で ゲー ム を 作る こと を 思い 立ち , 何と で き 
て し まっ だ ん で す な 。 これ が . 1 つ 作 っ て し 
まえ ば 上 達 は 急激 に 速く な り ま す . 後 は 短 
い ソ ー ス の 形 で 発表 きる れ て いる マシ ン 語 サ 
ブル ー チ ン な どか ら テ クニ ッ ク を 吸収 し て 
いん な も で に な よう と と うし て 私 は 現 左 に 才 
っ て も ます 


j Ж 649263 い ーF fy жө 


(3707 フミ ング を する の か ? 


これ は プロ グラ ママ にとって, あるいは 究 
極 の 問い か も し れ ま せん . な ぜ プ ログ ラミ 
ング を する の ヵ ? 私 が 思う に , プロ グラ ミ 
ング と は メチ ャ クチ ャ カッ コイ イ 言 い 方 を す 
5L, 「 論 理 ほ の 戦い 」 な の で す . その プ 
ログ ラム が ゲー ム で あれ ば , 完成 後 そ れ で 
遊ぶ と いう こと で も 楽し ゆめ ます が 。 ブ ログ 
ラミ ング と いう 行為 を の も の が ある 種 の 
(と いう より は まき に ) シミ ュ レ ー シ ョ 


ン ・ ウ ォ ー ゲ ー ム な の で は な いで し ょ うか 


困難 な バグ を 取り 終え だ 瞬間 な など, ミッド 
ウェ イ 鳥 を むと す よ り も , ある い は イン で 
ー ダ "を 全 減 きせ る と いう より も 大 き な 快 感 
が 得 ら れる の は 私 だ け で し ょ うか ? 
すなわち 。 Ут» эд x m ass tr 1: 
め の に デ ロ ゲ ラミ ング を する | OT. これ 
は 先 の 問い に 対す る 1 つの 解答 で ある と 思 


いま すし , また 私 自身 の 理由 で も あり ます . 


それ ゆえ に , ブロ グラ ム を 開発 する システ 
ム が で き , 人 が プロ グラ ミン グ す る 必要 が 


な で た と も とし て も Aust-ebLOX 


ログ ラミ ング を 楽し む で あろ うと 思い ます 
(も っ と も これ は 自発 的 に 行なう 場合 で あ 
oC, 人 に 強制 る きれ る プロ グラ ミン グ ほ ど 
つま ら な い 仕 事 は な いと 思い ます ). 


СЭ + РС»? 


ご 存 知 の よう に 私 は PC-8001 用 の ゲー ム 
ば か り 発 表し て き て お り ま す が , な ぜ そ う 
する の か と いう と , これ は 純粋 に 経済 的 理 
由 か ら で あ り ま し て , つま 9 お BC の ゲー ム 
し か 作ら な い の で は な く , PC し か 持っ て 
いな い の で PC の ゲー ム し か 作れ な い の で 
す . よく 〈 “ 愛 機 " に つい て 取り 沙汰 きれ ま 
Тт», いろ ん な マシ ン で ブロ グラ ム が 組め 
る と いう の は 。 それ は それ で いい こと だ と . 
思い さす さよ (多少 論点 が 違う か な ?)。 も 
っ と も 私 も 自 機 に は か な り の 愛着 を 感じ , 
SPOCK な ど と 名 前 を 付け て は 家族 や 友人 
に ヒン シュ ク を 買っ て いる 次 第 で す . id, 
PC は 私 の よう な マシ ン 語 練習 生 が 使う に 
は 非常 に 使い 勝手 の よい マシ ン な の で す . 
CPU は 1 つ だ け だ し , V-RAM は 直接 ア 
クセ モス で きる し , メモ リ の 少な い の が 欠点 
C123, と も あれ PC 万 歳 . ん 


£3 
後に 

いか か が や し か か が か? まっ だ くい つる 本 中 
ら ま と まり が な く て すみ ませ ん . 特に こん 
な 記事 を 書く と , 文才 の 無き を 痛切 に 感じ 
TLG T 少し は 皆 き ん の お ぢ お 役に立て 
EELIST 

結局 。 何 も 書い て いな い に 等 し いよ うな 
気 も し ます カ が , 私 が 書き さ た か っ た だ の は パッ 
ауУРЧИО aah о >» с TA 
チャ クチ ャ で も 何 か や っ て みる こと が 上 達 
の 早道 で ある と いう こと で す 。 マシ ン 語 の 
習得 な 6, 1 文字 表示 きせ る こと も よし , 
キャ ラク タ を 動か す も よ し 。 私 の よう に い 
き な り ゲー ム を 1 作 と いう の も まだ よし で 
4. だ と え ぇ 失敗 し た っ て , 誰 に も 迷惑 は か 
か り ま せん し ( 途 労 感 は 残り ます ヵ ), R 
に 成功 で も し たら 大 き な 自 信 と 意欲 が 湧い 
て きま す . 

か く 〈 偉 そう に 書い て いる 私 も 最初 の 投稿 
BASIC 1: t 5 БОМ お 8 まし とし な 
PiO と 共に プロ グラ ミン グ の 力 を 付け て き 
だ よう な も の で あり ます (勉強 に な っ だ と 


いう より 励み に な り ま し だ ). 私 に で き て 


皆さん に で き な い は ず が な い の で す . WS 
^, 頑張 っ て くだ さい / 

以上 , 伝説 阪神 の ムダ 話 で し た . それ で 
ә, «т 


PiOPiO っ て 本 当 に コミ ュ ニ ケー ショ ン の 場所 と し て 最高 で すね . 私 の 文 に 対し て ちゃ ん と 答 も も ら え だ た し. な ん と 言っ て も うれ し か っ た 
の は It'sa 氏 に "IC" 付け で 呼ば れ だ た こと. 私 の よう な 者 に "Е" を 付け て いた だ だ ける な ん て 光栄 で す 。 
зл ТРО ТС З ОБ, せめ て PiOPiO だ け で も FP ネ タ で 埋め つく CALES, 


P.S. FP ユ ー ザ ー の 皆さん , プログ 
(どど ん ば ぱ ば 大橋) 


BASIC 十 マン シン 


田原 作 : EEZ 移植 : FHA 


PC-1251 版 の ESCAPE ROAD は た だ 自 
動車 を 避け る だ け で し た が , それ に トン ネ 
ル と スペ シャ ルポ ボ ポイ ント を 加え て で きた の 
が , この ESCAPE ROAD 2 で す . あな た 
は どこ まで 生き 延び られ る か . 


圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 4210—4398 


だ いた い 良 く で き て いる と 思い ます 
が , 1251 版 に 比べ 少し 遅い よう で す . 


(Ta) 


入力 方 法 


まず 。 リ スト 1 の BASIC 部 を 入力 し て 
セーブ し て くだ きる い 。 つぎ に 各種 モニ タ で 
リス ト 2 の マシ ン 語 部 を 入力 し て ,。 Xo 
BASIC 部 の 後に つづ け て SAVEAM 
“ESCAPE2 「, 
に じ に てく だ きも で 


遊び 万 
CLOAD| ENTER | CLOADM| ENTER | 


で プロ グラ ム を ロー ド し た ら , 音 を 出す と 


s [DEF [5], 出さ な いと き は IpEFIC| 


&4210, &4398 で セー ブ 


リス ト 1 ESCAPE ROAD2 BASIC!) スト m mmm 


を 押し て くだ さる い . 次 回 か 6 iX RUN 
| ENTER | で す . 

ゲー ム の 内 容 は 右端 に いる 自分 の 自動 車 
(表示 3 ドッ ト の LINE) を |Z |[O| キ ー で 上 
下 に 操り , 左 か ら 走 っ て 〈 く る 自動 車 (5 ドッ 
ト の LINE) を ひだ すら よ け て くだ さい. 1 
ドッ ト の 点 は スペ シャ ル ・ ポ イント で 十 1 
km で す . 黒 四 角 は トン ネル で , 自分 の 位置 


が わか りら な くく なり ます . 


そし て , 自分 の 車 は 全部 で 3 台 あ り 。 全 
部 ぶつ か る と ゲー ム ・ オ ー バ バー です. 
な お , 画面 の 上 下 は つなが っ つて いま す . 


ノロ グラ ム に つて 


ゲー ム 本 体 は マシ ン 語 で す . 詳し く は 表 
1, 2 を 参照 し て くだ さる さい. 走っ て 《 る 自 
動車 が 多 す ぎる と 思っ だ ら A の 値 を 増やし 
て くだ るい. まだ , Ж 132017 ОРОКЕ 
文 の 値 で 決ま り ま す ( 小 さい ほど 速い ). 


最後 に 


4200H か ら マ シン 語 部 を 作っ だ た の は , 
PC-1245 へ の 移植 を 考え だから です 


ЖІ アド レス ・ マ ッ プ 


9-2 エリ り ゲ の クリ ア 
左端 図 作 成 
右 ス クロ ー ル 
SCORE 加 算 

低音 BEEP 

高音 BEEP 


初期 設定 
メイ ン ・ ル ー チ ン 
REVERSE 


コー ス 状 況 
0 一 空白 1-7 X 
8—14 S.P 
15 トン ネル 


(4200H—C200H ^). 本 当 は PC-1245 版 も 
作る 子 定 で し だ た が, 今回 は 見 送り まし た . 
要望 が あれ ば 作り ます . 

PC-1401 は BASIC レ ベル で は 使い づら 6 
いで すわ が, マシ ン 語 レベ ル で は ROM 内 ル ん 
ー チ ン も つか っ て いる し , 関数 ルー チン が 
容易 に 使 を る の で と て も 使い や すい で す . 
私 は RND ル ー チ ン を 愛用 し て いま す . 

PC-1401 の ブログ ラム が 毎月 載る よう に , 
皆さん も 頑張 り ま し ょ 2 う . 

3 参考 文献 
ЕЕЕ 2: 
284 年 9 月 号 


"ESCAPE ROAD”, PiO, 


421й:1Й42ЙЙЙЙЙЕЙ2ЙЙ 42B0: 2930410600004 43258:42b2574367882314:61 

4218: 42B8: Кын ол 4258:82872C18671B2818:FF 

” HI-SCORE 4228: 42С0:571045й89ййй0й0518:42 || 4368: 1042Е25742670828:64 

E “5С-”;5ТР% 4228 42C3:9588858C18468898:94 || 4363:83820118042b2522D: B3 

S9 "EM": INPUT "YOUR H 4238 4210:8йй051957125ҒйЙ221:Е9 || 4378: 3288232418427B52: EE 

AMECMAXT? "Nf 4228: 10600000041F37D0: û4 42D8: DBIIF27125F8231DB: 78 || 4373:82FF 758884855241:12 

ОЙ: АІТ B:PRINT "REPLAY 4240:02828D855C229024D:63 42EB: DF27821042bE20204:53 || 4338: 238E377342DBA80368: 66 

(Үү: CALL &1425: 4248: 3TB2B8F1842085282:EE 42E8:52784218E5427342:5D || 4338:8288E278073437182:32 

PRINT *":K$sINKEY$S : 4258: ТҒ20ійАЙ2ӢЙ 104200: 1А 2Ғй:8Е7842191й042Е257:ЕС || 4238: 40Е270734571Е5А2: 45 

IF K$-"Y" THEN 28 4258:522D221804628080887:8E || 42Ғ8:75425Ғ10845й0952й5:йй || 4598:57й0йййЙйЙЙЙйЙЙЙ: 37 
IF K£$-"N" END 268:98187884FFED4B8E: 5B 4388:688248E270808324:1B 


4388:6580524129867842:E1 
4318: ПЕйЙЙ5ЕЕВВЭ412904:Ғ2 
4313: ESA28B18EBB94123:405 

4328:80418428F57D51842:E3 
4528:Е25785С77Е42Е165:87 
4338:883312638F 38B8ET1: 73 
4538:872728й09й21й7842:СВ 
4348:0C178421482817342: 8C 
4348: C1E48F6786288E18:E7 


4268: DB7T48071042085275: 6F 
4278: 8718423F 354028878: AE 
4273: 4233581060025237: Jø 
4288:1842888880F981311:18 
4288:81ййЙЕ9й19577842:89 
4298:8810684880802 18818: ЕТ 
4298:1868048080223D1983: TB 
:688223E278080236882:3C 
:69E273008052421741:54 


:5070 38 

<20 THEN 30 PUKE $4204: 512: 
:НАІТ I188:PRINT "жж í СЕ &42DB $12: GO0TO 
АМЕ  UVER жж°:5= ; 

ET»xB.1 zB:"D" POKE 64204,37: 
:IF 5<=Н PRINT "'SCs": POKE &42DB:&37:60T0 
STR$ SS:"KM":PRINT "H 18 

1-5С=°:5ТЕ$ Н: "KM": 20: РЕМ 44210-64329 


3 
aa 
ій: 


pe рь 
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PC-1350 


BASIC МР 


エン プロ イト ・ ソ ル ジ ャ ー 


== жы í 55: (> Ее i 


iussu db. 


金欠 病 で 困っ て いる あな た は , 外人 部 隊 El! 空中 給油 の 合体 の 形 (42 地上 戦 の 時 の 戦車 の 例 


ЕЕ ЖЕТ TOSEFU kak O = e (S L Z=. 
し か し , 思っ た より ハー ド な 仕事 に 体 は 弱 
っ で も CE が りり だ っ た 

この ゲー ム は , 戦争 に 参加 し て 人 金儲け す 
る と いう 邪道 な ゲー ム で す . あま りお 金 に 3, こち ら か ら 攻 撃 を し ます . キー は [4] 
執着 する と 死ん で し まう の で 気 を 付け て く сж, [6]сж, [8] で 下 , [2]сь, [sic 


だ さい 、. ミサ イル 発射 に な っ て いる の で , 照準 に う 
圏 プ ログ ラム ・ イ ン フ ォ メ ーション まく 入れ て 攻撃 し て くだ きい. 


その 後に 相手 側 の 攻撃 が あり ます . 今度 
は キー の 働き が 反対 に な る の で 気 を 付け て 
くだ さい. [s] z, [e]c ж. [8] で 上 , 
|2|] で 下 に 動き ます . ダメ ー ジ が ある と 
| : á : BEEP 音 が 鳴り ます が , ダメ ー ジ が た だ まる 
nie i о нафр と 爆発 し て し まう の で 気 を 付け て くだ さい . 
ー ジ な どの 計器 類 の 表示 が ほし か っ 基地 に 戻る の は , 命令 を 完了 する か 。 ЯН 
手 の 攻撃 が 終わ っ た 後に 開い じい て きた と き 
に |Y|(Yes) と 押し て くだ さい . 基地 に 
ШЕТ р | 戻る と, 機体 の 修理 , 燃料 ・ ミ サイ ル ・ 爆 
MN | 弾 が 補給 され す . 
XS それ か ら , 命令 を 完了 する と ボー ナス ・ 

まず , RUN ま た は | DEF [AI で スタ ー ト ейи b id. 相手 の 攻撃 
し ます . 所 持 金 と 健康 度 , 燃料 と ミサ イル か ら 逃 げ る の と 同様 の キー 操作 で 合体 し て 
の 数 , 爆弾 の 数 が 表示 きれ ます . その 後に くだ きい . 成功 する と 3.000 ド ル が 支給 き коодо ашк I А SES 
基地 か ら の 語 令 (地上 攻撃 ・ 空 中 戦 ・ 緊 急 DET. さら に , ポイ ント は , 地上 攻撃 が E FILA RC DOS OC OC AR OCA, 
発進 の いずれ か ) が 出 ま す . 3 点 , 空中 戦 が 1 点 , 緊急 発進 が 2 点 で , Ж ا‎ Tw, 


4 Ф 
を 
+ 
# 
+ 
% 
+ 
+ 
+ 
を 
を 
を 
4 
を 
+ 
* 
е 
+ 
Ф 
を 
+ 
+ 
+ 
+ 
* 
* 


そる て * て タテ OC 
ow d $ od» o dp キマ фф 


地上 戦 で は , 画面 右 下 に 黒い 所 が 表示 き | 進 する ご と に 加算 され ます . nene 
N, その 中 に 戦車 が 1 つ 出 ます . 戦車 が 現 Pp S ҮН (С "ARE YOU ALL これ は PB の ゲー ム 「 エ リア 99」 を ヒン 
われ た だ たら その 座標 (1 一 5) の キー を 使っ て 爆 RIGHT ?" と 聞い て きま す が , 健康 状態 ト に し て いる の で , 少し は 似 て いま す が 
弾 を 落と し て くだ さい . し ば らく する と, が 悪けれ ば |N|(No) ERU C. お 金 を 払っ プロ グラ ム 自 体 は オリ ジ ナ ル で す . 制作 
相手 側が スク ラン ブル し て 空中 戦 に 移り ま て くだ さる さい. 100 ド ル で 1 だ け 回 復 し ます . に は 1 週間 程 か か り ま し た が , 初め て 作っ 
+. JK: 9 5 2 EC А, «Сны Кз ы s Ww t S AM 

空中 戦 と 緊急 発進 は ゲー ム 方 法 は 同じ で ЕО СТЕ С, ЖОЕ 
$2, あと で 話す ポイ ント が 違い ます . š 容 の ある ゲー ム を と いう の で , 授業 中 の 睡 


. 眠 時 間 が な く な っ て 四 苦 仏 苦し まし た だ. b 
な み に , 10 カ ドル を 取る に は 2 時 間 半 も か 
か っ ら て た まい まし だ た だ 、 は うつ きり いっ て 疲れ 
id. 頑張 っ て チャ レン CARET 


Ш EMPLOYED SOLDIER BASIC! X 


5 : WAIT 190: RANDOM : CURSOR 75: GOSUB 609 
LS ы PRINT "$ "5 STR$ 527 Sa:CURSOR 72: IF RND 10 
"t by 738% -18 PRINT “SCRAMBLE 


"GROUND WAR":ü 1BB:WAIT 38: GCURSOR (81 
BEEP 1 %(Т-10ж7;51): 
өзімен I=ñ TO RND 1й+1й GPRINT "aBFEBAAFBAFE 


AIT 200: LINE (28,1 30:B=0:C=10:D=10:F=100: !°:й=й+1: GOTO 200 
RR 21 BEEP 1 68:IF RND 925 PRINT "DO 
M=B:H=100:0=0: 4B:CLS : GOSUB 588: G FIGHT’: GOTO 280 


:Т= ЕМІ 5: WAIT B ай” 
38: LINE (80%243-Х(11631 118:2$- INKEY$ : IF 28" 
Js BF " ÜR D=d THEN 130 


(O) (O) この まえ 学校 か ら 帰 つっ て くる と き , PiO ノ PiO ノ と いう 声 が 聞こ えた の で , だ れ か な と 思っ て 捜し て みる と 信号 機 で し た . その 日 は ちょ 

Ол Ол うど PiO の 発売 時 ど っ だ た の で РОФ2НН-ЫТІНЖІУІОСФ, Cb. も う 片 方 の 信号 機 は ピッ ポ オ ./ ピ ッ ポ オノ / と 鳴く の で す .。 何 を あ 
げ だ ら よ い の で し ょ う 。 ОЗАЖАТ/ ( 加 武 神 也 ) 
支店 し い 発 圭 の 本 で も 買っ て あげ て くだ る い . きっ と 今度 か ら は ピオ ノビ ピオ ォ オノ / と 鳴く で し ょ う . Р! 


BO 


EMPLOYED SOLDIER BASIC リ スト 


128:D-2D-1: IF Z$-2 STR} T IF EX= THEN 444 4zB:IF Ү515 AND “5740 4980:H$z"": CURSOR 72: $5601IF 2$z2"8"' LET YsY-1 
LET М=М+1йй: ВЕЕР 1 iüB:CLS : 00508 588: AND х<64) WAIT i88: INPUT "ARE YOU ALL: P TTB8:IF Z#="4" LET xX-2X-2 
| 138:HzH- ЕНІ 2*1:F-F-.5: WAIT 1880: CURSOR CURSOR 72: PRINT "BR IGHT ? "52$: IF 2$z" T8B:IF Z#="6" LET #=x+2 
50508 588: NEXT I: PRINT "AVOID ІЗ: EAK TANKER PLINE !*: М” GOSUB 600: ТЭЙ: RETURN 
IF Hizü THEN 388 BEEP 2 | ВЕЕР 5: GOTO 470 ` CURSOR 72: INPUT "MO || S8B:WAIT B: GCURSOR “х.т 
148:605UB 6880: CURSOR 72 || S18:CLS :х= РН} 2й+4й:ү= || 435:IF X252 AND ¿Y=14 HEY $ "; H$ ` y: GPRINT "BBBB2B2B2 
: PRINT "EMERGENCY 1 RNI 28«18:K-8 DR 『=13) LET M=M+200 || 495:Hs INT (Н+ VAL W$/18 27й5270287050702й2й2 
AX BEEF 328:60SUP 888:2$- B: HAIT i88: CURSOR B>):M=M- YAL W$: IF M aeaaa" 
H=H+1iE= RND 4+1: IHKEY$ : GOSUE 758: ` JZt PRINT "NICE г" «8 CLS : PRINT "NO M ЗІ ІНЕ 56 (1551-0654 (15); 
50515 &88: CURSOR 72 || 00508 388:F=F-.5: ВЕЕР 2: GOTO 470 ONEY !": BEEP 3: : LINE (Es 11)-(5M* 1 
: PRINT STR$ Es" ENE IF Fiz8 THEN 200 440:X-2X* RND 5-3:Y=Y+ END 25: RETURN 
RIES. 55Йі5-Х%( RND 3-15* SGN ЕНІ 3-2: GOSUB 1888 499:60T0 30 3BB:CLS : WAIT i88: 
:505UB SHA: CURSOR 72 (52-xo:YsY4C RND 2-1 445:IF Ү512 AND (х>4й 588:MaIT B: CURSOR й: CURSOR 25: PRINT “YU 
: PRINT "ATTACK":Kzü уж SGN (1 イー KSK: AND х<64) WAIT 188: PRINT "MONEY $ 73 U AER DEAD ...": 
: BEEP 1 Н-Н-( ЕНІ 2-1)*(B>5) CURSOR 72: PRINT "BR STR$ M ВЕЕР 2: CLS : GÜSUB 
ACLS :Х= RND 30+30: Y= 348:IF X545 AND 5559 ЕАК TANKER PLINE !": S18: CURSOR 24: PRINT "HE SAA: WAIT 188: 
ЕНІ 2ӣ+1й AND Ү>12 AND Y<22 ВЕЕР 3: 5HTU 470 БЕЛІҢ: 3 SIRS H&^ —* PRINT 
:0050В8 800:2$= LET B=B+1:H=H- INT ¢ || 450:IF X252 AND (Үз14 S28: CURSOR 48: PRINT 998:IF M>S CLS : CURSOR 
INKEY$ : hHSUB TAB: RND B?: ВЕЕР 1: DR 『=13) LET MzM«288 USING "Ўй ° У "FUEL ` 8: PRINT -"Hrsht. Scor 
00508 888:F-F-.5: >15 OR Н<=й B: WAIT 188: CURSOR SF: USING "fiüm"s" M: e | "5 STR$ М:5=М: 
IF ЕХ=й THEN 300 aga Pat PRINT ИСЕ Us SC" B: A INPUT "Hame “SNF: 
IF 2$="5" AND C>B sn: (=2 THEN 32 ВЕЕР 2: hiHTH 478 USING END 
BET БОТАЛЫ АУ ep 2: GDSUB SAA: 46й:К=К+1: IF Ki-2zH 538: RETURN 999:ЕМІ 
AND 5555 AND Tid INPUT "BACK TO THE Ë THEN 428 БЙЙ:ИАІТ 58: CURSOR 72: 1BBB:DCURSDFE (ҮҘ 
AND YY2 THEN 278 АЗЕ ? 932%: IF 2%-7Ү || 47T8:CLS : GÜSUB 586: PRINT " GPRINT "888282828 
&zk* RND 3-2: Y-2Y-4 " THEN 49ӣ WAIT 1880: CURSOR 72: - 705C7028705C702020 
RND 3-2:К=К+1: IF K< 29й:0070 218 PRINT "BACK TD THE В RETURN | 200000" 
-25 THEN 228 4йй:С15 : CURSOR 25: ÅSE !": IF ñ>=1ñ TI ロニ RHD 2-1: 2 CURSOR (51.7): 
:WAIT 188: GPRINT : PRINT "> AIR REFUELI LET й=й: GUSUB 688: y LET YsY-6 GPRINT "0020202020 
GOTO 388 NG <": CLS : WAIT 0: CURSOR 72: PRINT "ВО || 718:IF Z#="8" LET Y=Y+b 207T8980Ta8FCTaG907020 
:М=М+15й:Е=Е-1: FOR I К=й:Х= RND 20+40: Y= UNUS!" :М=М+1Е4 20:IF 2$2"4" LET XS 28282828088": 
=й TO 16 STEP 2: RND 15415:MzM«1888: 488:G60SUB SAA: IF М>=1Е5 RETURN 
LINE £X*8*I*2:Y-2-I? ВЕБЕР 2 CES : CURSDOR 25: "iB: 2Z$-"&6" LET 
-(OR*8-I*«2:Y-2* ID эВ 418:G0SUB 1888 PRINT "YOUR WORK IS 
: ВЕЕР 1: NEXT I 428:2$- INKEY$ : GÜSUB Т OVER .": ВЕЕР 5: T4B: RETURN 
:WAIT 100: GPRINT : 50: GOSUE 1888 GOTO 998 Sg: IF Z$="2" LET Y=Y 


UN) y 39 لاھ‎ 


uu e! LOVE PC-1251 


る か , 敵 に 寝返る か , それ と も 戦う か … ? 


Amade あな た の 運命 は 決ま っ た. я А 
時 は 戦国 時 代 。 天下 を 我 が 物 と せん と チ > ; 
ャ ンス を 狙う 大 名 た ち . その 下 で 働く 足軽 ゲー ム の 説明 | 2 一 逃走 する 。 
の エエ れおな だ て で て すこ し か し 2 や を らき この ゲー ム は 。 いく つか の 命令 文 か が ら 1 3 一 必死 に 戦う . 
使わ れ て い だ あ な だ は, いつ か 大 名 に な り っ を 選ん で 進む と いう 方 法 を と り ま す . mak ш. „шол оен 
天下 を 統一 する と いっ た 野心 を 持っ て いた : NERA LL IR 
EN: 図 画面 表示 例 


を そん な ある 日 , 隣 の 大 名 と あな だ の 大 名 
が 戦 を 始め まし た だ た. しかし, この 戦は 隣 の 
大 名 に 部 が あり そう で す . あな だ は どう す 

表 


足軽 


Yl 

仲間 の 反乱 計画 を バラ し 出世 
\/ 

鉄砲 を 購入 し , 戦 を 勝利 に 導く 
Yl 

治水 工業 に 失敗 し 足軽 に 戻っ て し まう 
Yl 

杉 上 が 拾っ て くれ , あっ と いう 間 に 大 名 に な る 
Чу 

天皇 を 盾 に し な が ら 京 に 上 る 
Yl 

— PM -— 
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I 


РС-1245 


BASIC 二 マシ ン 語 


PC-1251/1500 な ど で お な じみ の デジ タル 


イン ベー ダー で す が , 1245 用 は まだ 見 か け 
た こと が な い の で 発表 する こと に し まし た . 
また 発表 する に あたっ て 。 キャ ラク タ ・ デ 
ー タ を 作っ て くれ た 井上 君 , ゲー ム に 燃え 
て くれ た 鈴木 君 ,。 どう も あり が と う ご ざ い 
ығ, 


H7n2724-77zz»*—a- 
—Ñ BASIC 
w; С400--С557 


敵 が 漢 数 字 と いう の は 変わ っ で いて 
な か な か 良く で き て いる と 思い ます . 


(Ta) 
Op Ob Op. op Oe Cp. 0D op Op OO Qo OP Op Q 
GEOP oou x е 960526. 
6 eo F Ф esle als, 
Ф $ <ç ( 94 ке g 


まず 適当 な モニ CT УШШ 
(リス ト 2) を 入力 し ます (必死 に POKE で 
入れ て も 構い ませ ん ). そし て BASIC 部 
SI Е САТО Р оета イス 
6 ああ お る 人 は セー ジン も で を あま し じょう 


(CSAVE “K. VADER" i; L U` CSAVEM 
"K. SRM &C400, &C557). 
aod or Pec 3 ОР С ср р 
d dod 3i TIS 7 Ў б ср 
% Ф + q А 


x 
i 


本 TA と スタ ー ト し ます ГЕК Rest 
字 を 合わ せ て | 一 | キー で 撃つ てく ださい. 
画面 の 左端 の 数 字 が 照準 で , 右端 の カッ コ 
の 中 は 画数 で す ( チ ャ レン ジン グ ・ ス テー 
ジ の と き は , カッ コ の 中 に は “CS” と 表 
示 き れ ま す ). 


な ん だ ろう か ? 


並 高校 合唱 部 


を この まえ 僕 は 合唱 部 に 入っ た . 


実は 漫研 だ っ た り し て … 
杉並 高校 新 一 


初期 設定 

メイ ン 
照準 ・ カ ウン ト 
撃ち 落と し 処理 
スコ ア 加 算 
BASIC 復 帰 処 理 
КЕ 


画面 表示 
音 発生 
スコ ア 加 算 (UFO) 
キャ ラク タ ・ デ ー タ 
敵 の 数 
速 さ 
AAT 
状態 
RND 初 期 値 
ゲー ム は 基本 的 に は 今 ま で いく つみ か 発表 
され た デジ タル イン ベー ダー と 同じ な の 
Ст», 私 は ルー ル を よく 知ら な か っ た だ の 
で UFO は 乱数 で 出 て きま す .。 まだ, 撃ち 
外し ます と 敵 の 侵入 が 無 条 件 に 1 つ 進 み ま 
З. < じ て 3 回 侵略 きれ る と ゲー ム ・ オ ー 
72 0, HI-SCORE の と き は NAME 
vNOCTCCAGHT. TEF HACA ET 
(M S V. 
すでに お ぢ お気 付き と 思い ます が 。 ZEE 
用 数 字 で は な <《 漢字 で 出 て きま す ( 一 二 三 
四 五 六 七 八 九 十 円 の 順 で 円 と に う の は 
UFO の こと で す ) の で , 慣れ な いと 多少 と 
FEIF. 
ЖКМУУУЖ» AT—PFTXIBKAU 
ずつ 攻め て きま す が 。 いろいろ な 速 き で 攻 
Е рас о о О А ОС ҮГӨ 


агі E 


ャ レン ジン グ ・ ス テー ジ で は 敵 が 一 番 左 ま 
で き て も 侵略 さる れ ま せん の で , 安心 し て デ 
レイ し て くだ る 

面 数 は 一 応 22 面 まで 作っ て あり ます が , 
22 面 すべ で て クリ アデ する 人 は まず いな いで し も 


5:8" WAIT 5=й: ZØ REÁD А,В: IF й=1 ЕНІ 255. RND 255 L-1: FOR І-й Т0 58: PRINT "!!!HIGH SCORE 
:L=Z: RANDOM : THEN "C. ST” :CALL C400: S=S+ PEEK NEXT I: IF L?&8 THEN lll”: INPUT "NNNE="i 
RESTORE 25:IF й-й LET М=1: GOTO &C5C2«18 PRINT " LEFT=”; H#:H=3 

1B8:PRINT "KANJII-VADER 1. 28 Й:ІЕ PEEK &C5C2-1 LET STR$ L: GOTO 30 199iCHLL 51000: GOTO "à" 
245": PRINT " HIGH= Z8:PRINT " TAGE NO. М=М+1: CALL 4576: ӘЙІРБІМТ "Z££GAME OVER? || 118: "C. ST* PRINT "CHALLE 
"3 STE ま H: PRINT " "+ USING "2g"; STR$ FÜR I-8 TO 58: NEXT »»": PRINT " SCORE- NGING <С5>° 
Y “SNS: PRINT "USE Mi USING $"»" I: GOTO 28 "$5 STR$ 5 128:FÜR I= TO 5: POKE & 
КЕҰ; ав) 48:POKE &C5CHsüs B Os Bs :BEEP 1: CALL 4576:L= 9Й:ІЕ 5H THEN ВЕЕР 2 ESCB i, RND 50+10,0, 


男子 部 員 が と て も 少な い . さら に その 少な い 男 


», 
TyPR AB E OO AD Ж СУЗ Ze E 2*6 Т, 


(Ф108 НО Jy T eo i tA). 


年 生 の 皆様 . ぜひ 入部 し て くだ さき さい. 


チチ 部員 の 中 に は , 
僕 を 合唱 部 に る そっ た 決 期 部 長 の 友人 氏 は , 女性 イラ スト ば っ か し 書い て いる . 本当に ここ は 


表 2 


点数 表 


チャ レン ジン グ ・ ス テー ジ で は , さら に 
X5 さ れ ま す . 


Ф d OC CE 94 Ж 4 а" d 
14 & C400 ~ & C550 O 336^ 4 ト 


1 d 4 

マシ ン 語 
Т. アド レス ・ マ ッ プ ( 表 1 ) を 一 応 書い て 
お きま す . BASIC は 主 に タイ トル ん や や 初期 
設定 を し て いて , ゲー ム 本 体 は すべ て マシ 
ン 語 で す . 鐘 C501 以 降 は キャ ラク タ ・ デ 
ー タ に な っ て いま す の で , 漢字 が 気に入ら 6 
な い 人 は 適当 に 変え て くだ る さい. 


[X D SP voL verde DA CIC pu LECT o ДЕНО ES 
сес ағас рр > 4; Ф др sie 
CY- CF. С СФ Ч m! B 0d 
Qoo Qe dq 7 9 9» Cr OU OD COE 
ЖО Асу» DESEAS Аы” т) ане ente dq АРДА B Tee: 
Or OC CC Op CK сұ ор CE Opp OE Oe Op Oo or 


マン ジン ン 和束 プ ログ プラ クム は まで モク ハン ネプ ola 
ンプ ブル し だ の で ,。 は っ きり 言っ て 疲れ まし 
12. 幸い 私 は FM-7 を 持っ て いる の で , Ж 
回 か が から は クロ ス ア セン プラ で プロ グラ ム を 


作ろ うと 思い ます . 
と ころ で 私 の 1245 は , [BRK | キー が きか 
な が の: が な だら まだ どい の で す が , : な ん た で その 


導 に ちょ っ と ショ ッ ク を あ だ え る と 勝手 に 

BREAK が か か っ て し まい ます . 皆さん , 
—REXUU-Ut2Ul.5. 
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2) Жауы рг ГАРЧ", 


HERM E OO ABA. 化学 部 と の 兼 部 者 


合唱 部 


PS. 1 定期 演奏 会 で は ミュ ー ジ カル も や っ て し まっ た りす る 杉 
PS.2 JR-100 用 の アド ベン チャ ー 完 成 延期 (無責任 グ ) 


PIO 


リス ト 1 漢字 ベー ダー ——ppzxBASICUAE 
8. FND 255, RND 255: 13й:М=М+1: GOTO 28 25+1,1,5Й,23,4Й,21 
CALL &C488: CALL 457 || 288:DATà 20:180,25,180,1 || 2180: DÀTÀ. 50»19,4й0,18,1,1 
6:5-5% PEEK &C5C2*5g :1:205 805255605 39 69 :305165405 15515 15 20» 
: NEXT I :1,1»20,4й»2й,5й,4й, 14,4й,15,4й,12,0»й 


リス ト 2 漢字 ベー ダー 一 二 四 五 マシ ン 語 リ スト 


С4йй BODBB2HFABIEA1B2:7D üB283C68082C3808:D3 || C490 600й820ҒАҒ620058: БР D853846088445058: ЙЕ 5Е242404500Ей006:СЕ 
C408 OEDBIBCSCUSTADDB:5D 5381088B41233C58:0A || C498 1ET1811220820001:56 || С4Ей 4401852426C12984:32 58241Е043С200808:Ей 
2418 ABB2BBDBAEBZBODE:U8 C729862093515153:B80 || C4A0 B8BB14BB1459B144:DE || С4Е8 C241291581812728:98 2E03087828382878:06 
C418 ADS36FDB18C5C4B0:D3 5008206722290902:08 || C4à8 В002810300148159:54 || C4FB 125F6122DF492992: 3E 93492478C5519299:FT 
C420 00011878C4C8F1E0:EE BFDB18C5C2574208:Bà || C4BB8 640FGTBB2B1hA113:DE || C4FB 50209С7404208821:55 4329024129000300: E8 
C428 FF440C3003082FFC7:F4 63883888520D7101:9E || C4B8 220889084BDBA182:5C || C588 A298989898982022: 9C 2824280000000000:ТЕ 
C430 5855085967483800:87 2800820110С5С252:22 || C4C8 ВЕБ5ӢҒ29480В2044:9] || C508 2222202020282820:22 @й516365йййййййй: 19 
[438 6736391457872347:;Ë6 ТВС#СВЙ1Й1ЗТВЕ1Й:РВ C4C8 B3C5F1E3B2BD03F3:3F ZE2R262R3E223E20:380 

2440 8200205980700162:1% C5C1577881C7296C:88 || С40ӣ F1F5000C0320DA30:1F 3829241496142494:D4 


02 


e t UE +T 


EFA 崖 の 大 冒険 
С, その 光 の 中 に 敵 (5) を 入れ る と 敵 は 消 ん て し まう . だ だ し , 


ゲー ム の 説明 し ば らく する と また 複 活 す 5. 


ビデ オォ 君 を 操っ て 。 ば ら ま いて ある ビデ オォ テー ジグ の 中 か 6 必要 エネ ルギー は だ ん だ ん 減っ て いく が , コン セン ト に 触れ る と 触 
な テー を 探し て 〈《〈 だ きい . テテ は ひみ と VHS の 2 種類 あり, 58 れ て いる 間 だ け 少 し ずつ 増え る . 
の テー は 拾っ て TV の 横 へ 行く て と, モニタ に 〇 か XX が 表示 きれ , Бат 画面 表示 例 


〇 が 出れ ば 1 面 ク リア , VHS の 方 は , 拾っ て か ら ま ず VHS 用 ビデ 
ォ オデ ッ キ の 横 へ 行っ て , ビデ オォ 君 内 蔵 の 2 に ダビ ング し て から 
TV の 所 へ 行く (ダビ ング に は 2 一 3 秒 か か る ) . 

ビデ オォ 君 は 敵 に 触れ る と 死ん で し まう が ,No5 の 敵 に は 電撃 と カ 
メラ 攻撃 が 可能 . 

電撃 は [| SPACE | キ 十 で 発射 , 射程 距離 は 2 キャ ラ 分 で 敵 を 
3 秒間 らい し びれ る せる こと が で きる が 。 エネ ルギー が 大 幅 に 
減る (も ちろ ん エネ ルギー0 で 死に ます ). 

カメ ラ で の 攻撃 は . カメ ラ を 取る と し ば らく の 間 No1 か ら No2 の 
キャ ラ に 変わ っ て , カメ ラ か ら 光 が 3 一 4 キャ ラ 分 で らい 出る の 

EBENE 


ENERGY 


ШЕКА 
masEmEPZSSSEDNOS 


EFFE 自分 (2 の ビデ オデ ッ キ ) 


Элен | 攻撃 時 の ビデ オ 君 
電撃 ビデ オ 君 の 武器 
カメ ラ ビデ オ 君 の 武器 
敵 触れ る と や られ る 
BE (雨雲 ) 触れ る と や られ る 
TV テー プ の 判定 器 
VHS の ビデ オデ ッ キ | ダビ ング 用 デッキ 
の テー プ 集め る べき テー プ 
VHS の テー プ 集め る べき テー プ 


コン セン ト ビデ オ 君 の 味方 


(な ん で も 組 の みや な ぎ 君 ) 


1S3 


EEKE & RI に 


君 は 某 群馬 県 立 O 田 高校 に 通う 花 の 劣等 
+. 日 頃 な まけ て いた (ギク ッ /) 君 は 明日 
テス ト が ある こと を 知り , RHEE 
に それ を 次 も うと し て , 黄 皆 の 学校 へ と 妨 


び 込 ん で いっ た の だ っ た … バ . 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


まあ まあ の 出来 で す が , 途中 の スト 
ー リ ー に 無理 な 点 が あり ます . こ 
あたり に も う 一 工夫 ほし いで すね . 


(Ku) 


初め に 


PC-1251 は , dini a 
ッ ク は 面倒 くる い 。 と いう こと で 英文 テキ 


AE SEN 


1 画面 が 24 桁 と た 小さく, メス モリ も 節約 し な 
《 く て は な ら な い の で , 上 身 文 が 文法 的 に お か 
Lob», ブログ ラム が 2 本 に 分 か れ て い 
て 入れ づら いと か いう 文 旬 が ある で し ょ う 
が 。 ТОТСА, 


前 述 し た と お な おり に この ゲー ム は 2 本 に 分 
DUCS OT まず サナ サ デ デ ログ ラム ( り 
ス よ 1) を 入力 し て セー ダグ, 続い て メイ 
ン ・ プ ログ ラム (リス ト 2) を 入力 し , サ プ 
アウ グラ な の 後ろ に を ー デ し で で さだ きい 
(全国 の PO ユー ザー で カキ ッ ド イオ インター ア 
ェ イ ス を 持っ て いな い 方 , 本 当 に すみ ませ 
ん . この ゲー ム は それ が な いと 動か な い の 
Ст. だ だ し , 1 度 実 行き せれ ば も うい ら 


な いい ので: Be Ka Sq b: AN E C e Z = 
い ) 。 


IT, ププ ログ ラム を ロー ド し もし,。 “а 


エダ は その まま (に し て ね い で RUN し ます . 


その 後 表 示 が 止ま っ て か ら | ENTER | を 押 
4k. メイ シン ャ デブ ログ ゲ グラム を ロー ド し て ゲ 
ー ム が 始ま り ま す . 
最初 に 言っ て お きま す が 。 本 プロ グラ ム 
は PRINT 文 に WAIT を 掛け て あり ませ ん 
DT, | ENTER | を 押 る な いと 次 に 進み ま 
DL E SHEE LCC МС (AS. 
入力 は 動詞 の 先頭 3 文字 + 一 十 名 詞 の 先 
頭 3 文 字 で し て くだ きい (名 詞 省 貼 可 ), 
例 ) PRAISE WAKA-KUN—PRA WAK 
使え る 動詞 に は LOO(K), GET 等 が あり ま 
7. 他 は 各自 で 見 つけ て くだ さい (全部 で 


e! 


れ ぞ れ 南 , Ж, *, 西 , に 動く こと が で き 。, 
B で 持ち 物 を 見 る こと が で きま す . 

それ か ら , メッ セー ジ に 出 て くる “F. 
A." は FIRST AID の ,“T." は TEACHER 
о, “G.” は GYM の 省略 形 で す ( 意 味 は 自 
еа aae Е фар) а 

%3, pO b Ө z k S ik u 入力 待ち 
D k š I-BREAK3 (uz, [DEF [c|— z z 
か ら 続 ける こと が で きま す ( 死 ん で し まっ 
だ 場合 も 同様 で す ). 

Са, 0 点 を 取ら な いよ うに 
スト を 捜し て くだ さい . 


т W 


頑張 っ て テ 


この ゲー ム を 作る の に , スト ー リ ー を 考 
ぇ えて くれ だ 長谷川 君 に 大 変 感謝 し ます ( 僕 
аса а nr ысы EUP Bas 

ャ ー は や っ だ こと が な い の で す 。 も ちろ ん 
作る の も 初め て で す が …). 

な お , わが O 田 高校 の 名 準 の た め に 一 言 
а 

よう な 人 は わが 校 に は いま せん の で , くれ 
ぐれ も 誤解 の な いよ うに . 


最後 に 一 言 , 

「 み ん な / 記 美 を 応援 し ょ よう. み 」 
LE 
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川原 良一 : "CAVE ADVENTURE”, 


> 1114). まだ , 移動 は S, N, E W, CZ 
РіО, '85 年 2 月 号 


DO esee ee ke c 5 doc ke k 0.3 Ғ227%5 328:DRTR “ЫН”, 2BSE "6" ||| DATA “RM” s” DMBTT*,*4 
AENEIS 39 жж ||] › . IS: DATA Жы | 

— A2VENTURI жені : THEN 1: : :DATêÃ 4 ト 3/8: | |. O Pi Sa" 

DU (СГ), NBK8- XUN, жж 125; | JUST 508 «PRINT "SET | a" * š FBE” s "LOJGF" 

Q:NSCM N)=P$ AD. 835:DATA "SI CSPPN" "Х70 

Ni NEXT" . РЕМ”, "TBNNF 
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Ей 


— 
оо 
cen 


әз 
(5 
[how] 
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kk 1985/82/45 жж 
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ош 
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اة 
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45 


1 bas | ie 


v 

JO” s "U/LFZ*, 
CJDZIMF”» "6 
/BZLFU" s "OPUF " | "SJOH 


D C$OD FOR X-21 TH LEN D$ ы 985: ДАТА 
1 P ま =P ま + CHR$ ¢ ASC 845:DATA "50°, "UPJMFU*, " "HzLFZ" 
MIDS (D$ X 1-1) 
E "s "NBO", “UFTU” 
eur TERI ера 910:0АТА "MPPL","HEU", "P 
ydus E сары %710" | 85S:DATA "IT"; *OPSDI*S "i ОЕП”, "HIWF"s "FBU*s*I 
n er кл | JU", "EJH* y "SJEF", "EJ 
:DATA "TO"."UFDOJT"."[|868:DATÀ "96". "05700", "7 WF's"UISPX"s."CVZ" 
12% 
се 999:ЕМ2 
DATA “ХК7»708517,713 ||865:26 Г", "6 


У 


еч - 


СЕВЕ : 


21м M$(333) 


-- 
Li 
e 


ç 


Wm moin 


О ња ка ка кул H - 


ЖҮ 


cn c 


D 一 』 —4 


оо со 
ーー (Cui 


жу $0 PET 


ба 


ss 
WA СП Жэ + PN X 


A Ye Ku HN. | 


20) AO) 3 月 号 p.140 の CRAZY RAT さ ん へ . コン パイ ラ 内 蔵 に する 必要 は な いと 思う の で す が . イン ター プリ ペタ 内 蔵 の 方 が メリ ッ ト も 大 きい と 中 
Ол О, 27. その 1 : 禁 走 し な い . その 2 : 理解 し や すい . ゆえ に, 気軽 に 使え る . 理想 ほし て は , クリ ー ン 設計 ,。 ディ スク 内 蔵 で , OS 上 
で 各種 言語 が 動 《 く こと だ と 思い ます . それ と テー RR TEEPE EEG 変え られ れ ば 最高 . PS.1 「 リ メン バー・ マ イ ・ ラ ププ 」 そ れ な 


り に 良かっ た だ. Р.5.2 「ZEPLIS」 を ほめ まし ょ う . 鈴木 君 の 反応 が 楽し みな の で (Moto-soft) 


oio 


リリ スト O.H.S. ADVENTURE メイ ン ・ プ ロ グラ ム BASIC リ スト 


人 太もも も も も も も も も も すもも も す も も 1 20508 425: RET URN ПР (X21 AND Үс "E LET 658:G0SUB 440: RETURN DR P$4»"BAL" GO0SUB 4 
2:"** 0。H。S жж|| 335:1F «=2 AND Y=1 AND B М=1 ӨТЙ:ІР Р%-”МАМ” ВЕЕР 25: 40: RETURN 

$5 ^ ADVENT URE жж =ð BEEP 25: PRINT "W||5i8:IF R>=13 IF R=28 OR PRINT "YOU FIGHT BAC||815:BEEP S: PAUSE “THROW 
4:7жж CO). WAKRTKUN, жж HY YOU HAYE ñ KNIFE (X21 AND Y=3 AND L) КІ HELP !!*:Vz1: ING THE BALL !!":V-23 
5:°жж % S.HASEDAWA жж 12%:Үс2: RETURN DR (X28 AND Үсй AND RETURN : RETURN 

5:"*«* 1985/82/86  **|| 34g: IF Хай AND Y=1 AND K Т=й) LET N=1 675:1F Х=2 OR Ү=й AND G-||840:IF Х<‹›3 OR Y<>3 DR P 
ТЕ, Wantok copo ERAO AND Т-й GÜSUB 435: 515:IF N LET WH$z2"NÜTHIND AND “p=” D00” BEEP 


1 $4»"BRE" GOSUB 440: 
6: PRINT "THE DOUR i 


g:"u0.2 (MAIN PRÜG. 2 RETURN "Uy$z"" RETURN 
:8:"à* BEEP 28: PRINT "|| 345:IF N AND 2 GOSUB 43 引 | 529:BEEP 5: PRINT "THERE 5 BROKEN !!*:6-2: 845:1F I BEEP S: PRINT " 
<*> O.H.S. ADVENT URE : RETURN IS ОЗО РЫ”: RETURN YOU DON.T HAVE А COI 
(жб: PRINT "COO. WA |] 350:Ү=Ү-1,8(27)=1: RETURN g4: BEEP 28: PRINT “ОН ! N !i*: RETURN 
KR-KUN. 65. HASEGAWA” RETURN 549: IF 0%-”М0Т” ВЕЕР S: DONST HIT IT !!*":V-2||85Q:BEEP 5: PRINT "YOU B 
105:°С° IF R(27) GOSUB 4| 370:IF Х=2 AND Ү=@ AND G PRINT CHR$ (34): "LET 2: RETURN UY THE BREAD.":8-8:I 
50: IF Хай AND Y=0 <>2 GOSUB 435: :5 READ 1/0 & PIO !"||TBB: IF X=1 AND Y=1 AND F =1: RETURN 
AND Кай AND T-0 RETURN ; CHR$ (24): RETURN =й ВЕЕР 5: PRINT '*TD||878:BEEP S: PAUSE "YOUR 


00508 228 
1180:0$2"": INPUT “WHAT?” 
10% 
115: IF 0$z"" THEN 118. 
20:P$- ВІСНТ% (0$52530$ 


945:IF Ха2 AND Y-8 AND b 
=g ВЕЕР 5: PRINT "Yi 
U GET А HAMMER. °:6=1 
: RETURN 

SS8:608UB 4828: IF R=13 


0 HARD TO DIG !!": 
RETURN 

T85:IF X21 AND Y=B AND F 
=й AND I BEEP 5: 
PRINT "FIND А COIN А 


BELONGINGS" 

875:ҒОВ M=1 TO 11 

888:IF М(25 AND АСМ) =0 
AND M57» OR АСМ) >= 
1 AND M=7)) PRINT C$ 


375:1F X21 AND Y=1 AND D 
=й ВЕЕР ©: PRINT “Са 
NsT 00 E. WITH BROOM 
."* RETURN 

388:IF М AND 4 GO0SUB 438 


X КӘРІЗ MERE. : RETURN OR R>=15 THEN 568 ND GET IT !°:1=0: (M) 
ASC RIGHTS CMSCNs Ds || 385:x=X+1sA(27)=1: 555:IF (CR>=2 AND R<=4) RETURN 885:NEXT M: RETURN 
12-63аМ- YAL DSCNS YO RETURN 09 CR>=6 AND R<=8)> ||T18:BEEP 25: PRINT "DON, || 959:MRIT 180: ВЕЕР S: 


»ü$- LEFT$ (C$(R)s3) || 410:1Е (X21 AND Ү=0 AND AND ACR) BEEP 5: T DIG SUCH а PLACE ! PRINT "YOU DIED !!*: 


«АС272-й К AND Тай) OR (X-2 PRINT "YOU GET "U$; viV=2: RETURN GOT 985 
15Й:ІҒ 0%=°5° GOSUB 300 AND Y=1 AND E? 5nSUB CS$CRO S", "АСВ 20€ TZU:IF X458 DR Y<>3 OR P||955:WAàIT 188: ВЕЕР S: 
135:1F O#="N* GÜSUB 238 435: RETURN RETURN $4" BIC" G0SUB 440: || PRINT "FOUND BY THE 
140:1Е П%-7”Е” GOSUB 370 || 415:1Е N AND 8 GOSUB 430||568:G0SUB 448: RETURN RETURN TEACHER !!" 
145:IF 0%-%4” 00508 418 : RETURN S88:IF X21 AND Ys3 AND 1 ||755:ВЕЕР S: PAUSE "RIDIN||968:BEEP S: PRINT CHR$ ¢ 
158:IF 0%=°В° DOSUB 870: || 420:Х=Х-1,а(27)=1: =й ВЕЕР S: PRINT "TH Rut 24):"LEAVE SCHOOL АТ 
GOTO 11 RETURN E Ғ.й.КІТ ОРЕМ 11%: ||740:IF L BEEP 5: PRINT " ONCE 179: CHR$ (340: 
170:N-8 430:BEEP S: PAUSE "CRN:T ВЕЕР S: PRINT "FIND BOMB !! YOU INJURED GOTO 985 


175:FOR M=18 70 28 
180:IF 0%- LEFT$ (C$CMD) 
5) LET NzM,Mz99 


T.KEY AND GET IT !!” 
Тай: RETURN 
585:IF X22 AND Ү=1 AND E 


tiv;L=0: RETURN 
ィ 45: り =1: RETURN 
TT8:1F ХОЙ OR ҮС 


97Ø:WAIT 188: ВЕЕР 35: 
PRINT "THE TEST IS F 
ALLING 1111" 


50 THERE.": RETURN 
435: BEEP S: PAUSE "LOCKE 
D.": RETURN 


185:NEXT M 44B:BEEP S: PAUSE "CANT ВЕЕР 3: PRINT "THE М 60508 448: RETURN 975:FUR М-й TO 2: ВЕЕР 5 

198:0N М-17 GÜSUB 500,54 DÜ.": RETURN INDOW OPEN !!":Ez8: ||775:ВЕЕР S: PAUSE "DIVIN|| : PAUSE “жж CONGRATU 
B| 5808 .61B Í 64B bd 70 | 45a:$2*.": IF Хай AND Y RETURN КЕ о RATIONS !! xx": BEEP 
As 730» TTA: 800, 340 =2 LET М%-” COURT." ||590:005/8 440: RETURN T88:1F H ВЕЕР 25: PRINT Si PAUSE "** YOU GET 

195:0N り +1 GOTO 1й5»950: || 455:IF (X21 AND Y>=2) OR||618:IF X458 OR Y<>2 OR P "HELP ! YOU ARE DROW THE TEST ! жж”: 
955,970 ((X22 DR Х=3) AND Y $+» "ERE" DR à GOSUB NED !":V-21: RETURN NEXT М 


220: BEEP 25: INPUT "GYM: 
S DIAL М0.:7:0% 
225:IF 0%< >2$% ВЕЕР 5: 


440: RETURN 
615: ВЕЕР 25: PRINT "THAN 
К YOU VERY MUCH 115%: 


785:ВЕЕР S: RRINT "FIND 
G.KEY AND GET IT !!" 
:K=0: RETURN 


988:BEEP 25: PRINT "YOU 
МОМ» Т MARK B POINT ! 


く >3) (ЕТ W$z" ROOM." 
460:BEEP 5: PRINT "HERE 
IS “INS X. YO W$: 


PAUSE "IT:S WRONG !! RETURN PRINT "GIVE YOU DIRL||gga:IF P$-"BRO" AND D=9 || 985:PHUSE "***** САМЕ 
": RETURN 480:U$=*ñ ": IF R=1 LET NO. 732817. "A=: BEEP 5: PRINT “THROW END жжжжж°: WAIT : 
230:BEEP 25: PAUSE FETS U$s*" RETURN ' THE BROOM. ":D=1: =A, A (2791 
6002 !!*:Ts1: 485: RETURN бӚЙ:ІР P$ く >"BRE" BEEP 25 |. RETURN 998: END 
RETURN 588:k$-C$(R)«N-0: GOSUB : PRINT "HOW UNSHVHR || 395:IF P$z"KNI" AND B=0 
3aB:IF N AND 1 GOSUB 438 434 VIT ГЫ И UE ВЕЕР 5: PRINT “THROW 
: RETURN SQ5:1F R く 13 IF CAKR}=A RETURN THE KNIFE. ":B=1: 
385: YzY*1:AC27)21: AND R<>T AND ROS) RETURN 
RETURN DR (6458 AND R27) OR 818:1F X<>9 OR Y<>0 OR K 


330:IF X22 AND Y=1 AND J (Х=й AND Y=1 AND H) (520 OR С<>0 OR T<?! 
^6 db dE S A5. УЧУЧУЧУЧУЧЫЧ 
ر0‎ r A». Y. " dete 
y % L. 


LY LY LD 
EYY 
“1 


PC-6000 シ リー ス 


ーー 


es mS 
= = — NEW L LT "SN Error" Li à + スタ ー ト し ない ので この ゲロ グラム を 作 
== 5 
プロ グラ ム 保 護 プ ログ ラム +1, 行 番号 を 消 を た うと し て も 駄目 な の o2 22: 
ペー ジ 数 は 2 で 32K, 16K の どちら で も で 注意 し て RA AP du» ム を 打ち 込ん だ 6, RUN し て 


動作 し ます . xg s E = くだ きい. ロー ド を 終え る と 自動 的 に ロー 
| — オー トス ツー トワ SN | PE 


この プロ グラ ム は ブロ グラ ム を 消せ な く Коллаж» А і 
まま を も の で すず. 入力 も て か GRUNT $ t, PC-6001 で は CLOAD の 場合 は 自動 的 に жср 27; 


リス トク オー ト ・ ス ター ト プロ グラ ム BASICUAFI 


5 REM FC-6991 D-h" 2 オート ・ マ タート 
16 A*$="CLDAD"+CHR% (13) + "КОМ" +CHR 
$013) 

26 FOR Ісі TO LEN(A$) 

ло POKE£&HFCZ8-«I,ASC(MID$(A$,I,1) 
) 

46 NEXT 

50 РОКЕУНЕВЕр,%Н29:РОКЕЗНЕВВЕ, ҰН 
ЕС:РОКЕЗНҒАЗ2, ЕМ (АФ) 


11711 プロ グラ ム 保 護 プ ログ ラム BASIC リ スト 
5 REM ЖЕ? IB 2 ЖА 

10 CLEAR 255,&HDFF7 

26 FOKE £&HDFF7-41,£HD6Óó:FOKE &HDFF 
7*2,*HC3:FOKE £&HDFF7-3,&HEA 

509 FOKE £&HDFF7-*4,£HO6Z:FOKE HFF? 


7,4HF8:POKE £&HFF98,&HDF 

9 FOKE £&HFFCD,£HFB8-1:FOKE £&HFFC 
E, &HDF:FOKE £&HFF96,f&HC3 

90 POKE £&HFFCC,£&HC3 
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С-1251/55 


マシ ン 語 


私 は 田舎 に 住ん で いる ある 種族 の 王子 だ . 
当然 天下 を どう や っ て 取 ろ うか と , エア ・ 
バイ ク で 散歩 し な が ら 考 えて いた . と ころ 
が 突然 。 目 の 前 に 地面 か ら 顔 を 出し た 大 き 
な 化石 が 現われ た . 

「 父 に 聞い た こと が ある ぞ .。 火 の 1 週間 と 
呼ば れる 戦争 で , 世界 を 壊し まく っ た と い 
われ る “PC ガイ ル " の 化石 だ 」 | 

私 は な ぜ か 赤い エア ・ バ イク の ボタ ン を 
押し , 叫ん で し まっ た . 

「 ド ッ キ ング ・ セ ン サ ーON ノ 」 

そし て PC ガイ ル は ほ と ば し り , バイ ク 
と 合体 し た . だ が , な に せ メ カ が 古い の で 
スー パー カノ ン の 調子 が 悪い . プラ グ は 切 
れる し , エネ ルギー は な か な か 増え な い . 

さて , どう や っ て この マシ ン を 使い 。 И 
の 王 と な れる の だ ろう か . 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


マシ ン 語 B800—C68F 
スタ ー ト B800 


‚ 画面 は 見 て いて 楽し い 
も の で し た . また 音楽 も よく 考え て 
いる の で す が , 音色 が ちょ っ と 高 す 


ET 


gm Т А 
шр’ 


ЖАЛ МІС 2Р9 
B: ЕТ БШ 


- 


&B800— &C68E š CI ə < v ОТ, 
PC-1251 に つい て は リザ ー プ も BASIC も 
使え を ませ ん . また 配列 ・ 固 定 変数 格納 領域 
も 使っ て いる の で , 55 に つい て も 同様 と 言 
ぇ えま す . だ だ し , 変数 人 たせ は な ん と か 人 使 
О ы ебе 5 


これ だ け の 量 の プロ グラ ム を, POKE 
文 で 入力 する に は か な り 5 根気 が いり ます . 
か と 言っ て 。 PC-1251 に は マシ ン 語 エディ 
タタ を 入れ て お いて 入力 する 場所 も あり ませ 
ADT, この プロ グラ ム を 前 半 と 後半 に 分 
け て 入力 する と いう 方 法 を と っ て くだ さき さい. 

まず 最初 に , 械 誌 で 発表 きれ た リロ ケー 


х ZT‘ ZF 4 Z Z &C000— &C600 の RI 
に 入れ , &B800—&BFFF£ C*AJJLUC 
“huasi qa nn taa E HK EÊ 78% чур тй 

KU &B800—BFFFO[Niz 774 Z PR 
き , 同様 に 入力 し て 一 応 セ ー プ し て お いて 
(5775, そし て ポケ コン に それ ぞ れ を 
ー ド すれ ば OK で す . 

まだ 55 に つい て は 違う 方 法 が と れ ま 
7. 立 B807 番 地 よ り 前 に エディ タ を 置け 
ば 良い の で す . そし て 55 ユ エー ザー は & 
B800— &B8071X A JJ U Z < C t Boo £ ¥ 
A. RIL, リザ ー プ ブ ・ モ ー ド O[SHIFT| 
[A] CALL &C400@ を 入れ て お ぉ おい てく 
だ さい . 

本 当 は BASIC の デー タ 方 式 を 使っ て , 
入力 を 少し で も 簡単 に し よう と 考え まし た だ た が, 
55 ユ ー ザ ー に も 楽し ん で も ら 6 お うと 考え , 
あえ て マシ ン 諾 デー タダ を 人 いま し た . 意味 
の わか ら な い 人 は , ポケ コン に この ゲー ム 
の マシ ン 語 を 入力 後 。 

POKE &B831.&EO ENTER | 
と 穴 っ て みて くだ さき るい. そし て BASIC W 
スト を 見 て くだ きい (51 ユ ー ザ ー の み 可 ). 

ЖІ アド レス ・ マ ッ プ 


サブルーチン 1 

オー プ ニ ン グ ・ デ ー タ etc 
ゲー ム ・ オ ー バ ー 処 理 

サ プ ブ プルー チン 2 

乱数 デー タ 
音楽 コン トロ ー ル サ プ 
敵 の スク ロー ル ・ ル ー チ ン 
得点 表示 ルー チン 

カノ ン ・ サ プ ブルー チン 
スー パーカ ノン ・ ル ー チ ン 
デー タ 1 

オー プ ニ ン グ ・ ル ー チ ン 
キー 処理 etc 
カノ ン ・ ル ー チ ン 

サ プ ブ プルー チン 3 

や られ た 処理 

デー タ 2 
メイ ン ・ ル ー チ ン 

ハイ ・ ス コア 処理 

1 万 点 処 理 


まだ PiO を 買お うと し た だ. する と 次 は 3 人 も / 


すね . PS.1 JR-100 購 入 し まし た . JUFC の 皆さん . よろ し くち お 願い し ます . 


| SHIFT |AI で ゲー ム 開 始 で す . オー プ 
ニン グ , ハイ ・ ス コア の 所 で は 小さ い 音 な 
が ら 音 楽 が 聞こ を る は ず で す . 次 に チャ ン 
Ж елы. ゲー スム ・ ス タダ タート 。 ZE 63 
へ 敵 が 向かっ て きま す . 

キー は 4 種類 あり , |9| で 砲 口 を 上 側 へ , 
|3| で 砲 口 を 下 側 に し ます . そし て エネ ル 
ギー が ある て い ど だ た まっ て きた だ ら |QOI キ ー 
C", i+. エネ ルギー は 砲 の 後ろ の 部 分 
で 増え を て いる の が わか る と 思い ます . そし 
<, プラ グ が つなが っ て いる 間 だ け 増 えま 
す . 

プラ グ を 抜い た りつ な い だ り する キー は 
[|e@| キ ー で す . P・ ボ ン バ ー と 呼ば れる 大 
型 船 を 撃つ と き は , プラ グ を 抜か な けれ ば 
撃て ませ ん . そし て エネ ルギー 量 は プラ グ 
を つ な で まで 見 れ な いし 増え ませ ん . 

エネ ホル ギー が 潮 ダン に な る と と НУ ЫЕ 
う 字 が 表示 され , 砲 口 が 変わ っ た 形 に な り 
id. その 状態 で 撃つ と , 画面 半分 の 敵 は 
倒せ ます が , エネ ルギー は 空 に な り , プラ 
グ が 抜け る の で 気 を 付け て くだ さい . 

瑞 は 撃た れる と 破片 を 散ら し て 姿 を 消し 
iT. その 破片 は 撃っ て も 突き 抜け ず , 敵 
を 守り ます . 無駄 弾 を 出さ ね よう 破片 に は 

表 2 登場 キャ ラク タ 


D・ ザ ー ト 


P・ ボ ポン バ ー 


まだ 同じ パタ ー ン で キン 内 マン と 


Р.5.2 Ryoko き ん の 「 ほ っ て ん くら ぶ 」 H5 €—/ 


"ТАУ ТОЛУ РНН КЕЗГКЕПРОТЕКТКТІУ a ーー ーーーーーーー 
"Q9 (O) p 学校 帰り に 本 屋 へ 立ち 寄り PiO を 買お うと する と , その 辺 の 小学 生 ( ?) が ドド ドッ と 駆け 寄り , キン 肉 マ ン と PiO を ぐっ と 握り 締め て レジ 
QA Qi の 方 へ 走っ て いっ た . あ然 と し て いた 私 は ハッ と 思い . А 
9 POF KEDTMSTL YDS. 私 は びっ くり し た . これ 本 当 の 話 で す よ .。 キン 肉 マ ン く らい の 人 気 に な っ た の で し ょ うか うれ し いこ と ょ で 
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気 を 社 け だ 方 村 良 いで し ょ よう: DNE тт グラ フィ ッ ク , キャ ラク タ 名 ( 点 ) 等 は 表 に 


度 破片 に 当たれ ば 破片 た ち は 姿 を 消し ます . 示し ます . 解析 し だ たい 人 人 は 名 C400 が か 6 始 

また 遠 距 離 の 狙い 撃ち を する t, 敵 は と め て くだ さい. 下 の 2 ケ タ が 0 一 20 の 間 の と 
きど き SLS と いう ビー ム を 了 石 と 化す 方 法 x, 敵 の 発生 率 は 上 の 2 ケタ が 発生 率 と し 
を 使い は ます. それ か ら , "P" の 字 が 出 て て 入り ます (た だ し 上 が 0 一 6 まで は 6 が 入 
も 消す 方 法 が あり ます . これ ら 6 の 2 つの 対 5). 


策 は 自分 で 考え て みて くだ るい. 


を し て 発生 率 10 の 状態 の と き 敵 が 常に 現 


な お , P・ ボ ン バ ー の 下 に 別に メカ が 潜 われ ます . 敵 を 倒し て いけ ば 発生 率 は 減り 


ん で いた りす る の で ご 注意 を . また ゲー ム ます が , と て も じゃ な い が 最 高 点 (オー ル 
中 に 止め た いと き は |BRK | キー を 押し て く クリ ア ) の 1 万 点 に は な り ま せん . 出す た め 
だ きい. に は 下 2 ケ タ が 0 一 20 の 値 を 出る な いこ と で 


pau 


[hot 
ж 


сш 
co c оз c co (2 


о 00 03 co 00 co 


we) oe حم‎ 


=. = =. سے‎ =. = зк т" 


SCBC1C1Cc10z4z424:88 
B848 5454545755572526:4й 
Bassa 1CICAAAAAAAAEETF:1D 
pasa ТҒй0йЕЙйЙ21015589Ғ:8В 
в86й ЭЕЗЕЭЕЗЕЗЕЗЭЕЗЕЗЕ:ҒЙ 
p263 ЭЕЗЕЗЕЗЕЗЕЗЕЗЕЗЕ:ҒЙ 
paTa ЗЕЗЕЭЕЗЕЗЕЗЕЗЕЗЕ:ЕЙ 
E373 ЭЕЭЕ9ЕЭЕЭЕЗЕЗЕЗЕ:ҒЙ 
B920 ЭЕЗЕЭЕЭЕЭЕЭЕЗЕЗЕ:ҒЙ 
923 9Е9Е9ЕЭЕЗЕЗЕЙЙЕЙ:94 
paog ЙЗТЕТЕАТІРЗЕВЕТЕ:92 
E293 6562йЕ1818181818:ЕС 
ESBR TETF6Z693397DTESB:88 
B343 ТЕТП417Ғ7Ғ41417Ғ:3В 
EBBO ТЕБЙБӢБӢЙЙҒЕ 19Сӣ: 6Е 
ESBS D18288052180BF2657:81 
ESCA 18CBETS5218BF3757:66 
BACB 67ЙЕТЕС48й790178:Е9 
Bano i18CéDàD488948263:72 
ESDS DB5882BFDB5882AF:C8 
ЕЗЕй DB5882CTDB8801624:03 
BSES 26412984F18F3482:Bh 
BBF 57DB5002BFDB50032:70 
B3F3 68DB58802BFDBT78BB:5A 
E900 2619ВС2Е571ЙВСТЕ:21 
poas 3055457Ғ(50й028йЕ:94 
B318 1йЕСЗҒ5ТІЙЕСТЕЗЙ:ТІ 
B318 55457FC58884802EF:52 
2920 DB5882C4DBS8B2AF:CD 
po28 DB5882CT7DB881824:83 
5930 2641290478СЙС8Ғ1:85 
8952 AF18CBD1D48811bET:1C 
B94 82815218BCBEB208:68 
8943 8118868262DBT78BC:12 
R350 9й78Сй007800С878:1й 
59358 caca848286DB5802:C1 
E9360 CzDB508297DB5882:B4 
B368 CZDB821178BB2878:85 
B9T С0С878С0С884й02й8: Bé 
B972 DB5882C2DB50828F:CC 
8980 DB50082C7DB001224:05 
8983 26412984F1üF18C8:04 
8990 ET8B28015278CODOFD:41 
8993 8D6769288479C4806:4C 
ВЭА 1й0С508й022й05211В1:Е6 
ВЭА8 02C65211EA0820752:38 
B9B9 3718C6DàD4808211:CE 
ВЭВЗ ü8B8T7T180CTBB1F180BD:7 

BICO 1757744010С7В652:01 
B9C8 11В80140ЙҒ18Ғ8402:С2 
B9Dà BñáDB5002C3DB5002:D7? 
pona 27DBb5882F8DB8814:3B 
BJE 242641298418CBET:6F 
ВЗЕЗ й2й055278(00078С0:97 
С878(0(878С0С878:4й 
В94й1йВВ67270й00й8:С2 


ず が ヒン トド ト せ は P OTOBRKA =< 
2м, そし て ラム ダ は 撃た な く て も 構い ま 
せん が , 撃つ と 敵 の 発生 率 が 少し 増え ます . 


PC ガイ ル マシ ン 語 リス ト 


57425267373088479:40 
BCS C31FDB800573BC88B: 76 
BC19 18BB675766403819:80 
BC18 8492EFDB8619BB6E:9F 
BC29 5742526757580479:40 
BC28 C31FDB999579BC89iT 了 6 
BC39 19BB6TST66893819: じ 9 
BC38 8492F4DB8619BB6F:15 
BC49 5742526735135А0479: ЗА 
BC48 СЗІҒОВӢВИВТЗВСЗ0: 7C 
BC58 10BB675766013826:4E 
BC58 8482D1DB8610BB68:EPB 
BC69 57425267565811й02:05 
BC68 805210BB67574352: 78 
ВСТй 78C19802865237DB: 3D 
ВСТЗ 95TSBL89379999:F9 
ВС8й0 8582BFDB8782F8DB: 7D 
BC88 2426412344379490: EF 
ВСЭЙ й0504В859640Ғ78ВС:С1 
ВС98 ñ10001B91CC3290D: 70 
BCAG 570й0056709280984:61 
BLAS B2CCDBT3BC303767:FB 
ВСВ 8828898482C7DB78:D9 
BCB8 BC88376707280984:96 
BECCA 8202DBT8BC803767:F1 
BCC8 8628098402BDDB?78: CD 
BCD9 BC88376705280984:94 
BCD8 й2В80В78ВС805767:ЕТ7 
ВСЕЙ 0428898402B3DB78:C1 
ВСЕВ BC80376703280984:92 
BCFA 828EDBT8BC803767:DD 
ВСЕЗ 022809840289DB78: B5 
BDaa BC88376701280984:98 
EDAS 8264DB7T8BC803734:F0 
ВВ1й Й29ҒО0ВТЗВСЗ05705:6А 
BD18 00044ЕҒҒ41290457:Ғ6 
BD28 18BC8EB8000118B9:E4 
BD28 18BFaGESTACTFCS86: AA 
BD38 В810ВС8Е19040222:55 
BD38 5294929952949242:FB 
BD4à 529299945284633B: し し 
BD48 3B0684025CDB5882:58 
BD58 Ғ8ПВ020В0404Ғ745:Ғ2 
BD58 298518BF35577503:01 
BD68 5218F83C8028052180:86 
BD68 С00102805210ВҒ 36: 5A 
BD78 ST18COE75210BCS8F:BB 
BD?8 576728281518BC8E: 77 
BD88 576706300710BB50:28 
BD88 522Cg719BB59g296: АЗ 
BD98 5210ВВ5057670956:6Е 
BD98 05455279С4885157:СВ 
BDR9 19BF349291529993: SB 
BDñ8 10Ғ85702021Ғ8402:08 
BIBA ZCDBS5882F8DB85D5:16 
BDB8 5595052R84631H2B:85 
BDCB 9H19C9H192495219: 4F 
BDC8 СЙЕТЙ20й5278С000:00 
BDD9 860267DB5002BBDB: B2 
BDD8 865767153801BD4080: 22 
BDE 116704ҒЕ788828В89:5В 
BDES 02010С7ҒС5867888:09 
BDFà 221ЙВВ5057740852:64 
86576715381BD400: 02 


0102040810200йСй:ҒҒ 
020408102000С061:ҒҒ 
0402082010008040:FE 
040820210010800040:FF 
8800040210010040: BF 
40040200180800088:FE 
0440001001200082:Ғ7 
08004004200090й02:ҒЕ 
0140080420100й082:ҒҒ 
4421448319994348: 2D 
9102040810200080: BF 
194989229499999:FF 
498922991491999: イ F 
8994299249199199:FT 
3008040220401000: ЕЕ 
3001030204104020: FF 
010080020400401й0: 07 
0801008020401008:01 
0201040040104008:ҒҒ 
0102008420400810:ҒҒ 
0200800440082001:ЕҒ 
1002003403402000: FE 
01020408102009Сй:ҒҒ 
192948192999 じ 9iFF 
2204081020010080: BF 
4002040810008040: 1E 
0120040200003210: ВЕ 
9140080400801000: DD 
2201080420400090: FF 
010204032008C0180:FF 
020108040080004й0: EF 
01020408102000С0: ЕЕ 
3402FFIB5002BEDB: 4B 
58820FDB5802BFDB: 28 
0505241020Е75206:39 
5710С00152780000:52 
C2291078C8C803809: 08 
24180CBE752865718:96 
С0015278С000С529:07 
103778C13E670038: AD 
86670838823710BF:B5 
05 イ 749B649F526 イ : AF 
8638823718BB5C57:F7 
42521йВА04578508:ЕТ7 
18BB675744523700:57 
йййййййййййййййй: йй 
19BB675766923819:42 
8402D6DB8618BB69:F1 
5742526737309479: 40 
C31FDB8080578BC88: 76 
18BB675766043819:44 
8402DBDB86198BB66à:F7 
5742526737340479: 40 
C31FDB000573BC3880:76 
1ЙВВ675766Й83819:48 
8402E0DB8610BB6B:FD 
5742526737300479:48 
C31FDBa88578BC88: 76 
18BB675766183819:50 
8402E5DB8618BB6C: 43 
5742526131300479:40 
C31FDB888578BC80: 76 
19BB675766203819:60 
8402EAnDB8618BB6D: 09 


この 2 つ を 頭 に 入れ て , 1 万 点 を 出し て 


116?7D4FDT8B828B9: 5A 
02040С7ҒС58678В8: 0C 
BE19 2210BB5078B88E4D:C8 
BE18 86576715381BD480: 92 
ВЕ20 116704ҒВ78В828В9:58 
ВЕ28 820480 TFC58678B8: 0C 
BESA 221ЙВВ5078В80Е40:С8 
BE38 й65767155А1В0400: 02 
BE48 1167D4F773B828B9:54 
BE48 02070СТҒС58678В8:ЙҒ 
BESA 22180BB5078B88E4D:C8 
BE58 065767153180400: 02 
BE69 1167D4EF73B828B9:4C 
ВЕ68 82070CTFC58678B8: 9F 
BETA 2210BB5078B80E4D: CS 
ВЕТ8 9657671531BD499: 92 
ВЕЗӢ 1167D4DF798B828B9: 3C 
BE88 й209йС7ҒС58678В8:11 
BEA 221ЙВВ5078В80Е40:С8 
BE93 86576715381BD400: 02 
BEñB 1167D4BF78B3293B9:1C 
BEA8 82890CTFC58678B8:11 
BEBO 2218BB58078B80E4D: C8 
ВЕВЗ 065767105А8180400:ҒС 
ВЕСӢ 11567D47F73B828B9: DC 
BEC8 82178CTFC58678B8: 1F 
BEDA 2219BB5978B89E19: 3B 
BEDS BF35D408840825CDB: 85 
ВЕЕЙ 5992F8DB929B944: 0A 
BEES ҒТ45290510С0Е702:21 
BEF9 852T8C9D919F899: БА 
BEF8 8200003B1F79B8B6: 43 
BF99 120Ғ121212121214:8Ғ 
-BF98 16141614989B9799: БЕ 
BF19 8070905555555570:44 
BF18 6058085D815121113:51 
BF29 9E19111313131115: SE 
BF28 9959E9R9B98989839: 90 
BF39 999959899999979E: 05 
BF38 9999999999999992: 92 
BF49 7TF802000684054525:04 
BF48 1CTF492919989447: SE 
BEF59 45291Fd95F999999: ЕС 
BF58 121812199F199F12:8C 
BF68 9C8975C959454545:E9 
BF68 4599111134343434:37 
ВЕТӢ 1157515055115Ғ66:41 
BF78 5562115454545400:98 
BF88 78808204713180887C15ñ 
pF88 a201a0880808008080842:45 
BF9 2212284542424242:8С 
BF98 ТЕЙ2422#йАЙБӢЙӢЙ: BC 
ВҒАЙ ТЕТ242Т7ЕЙЙЙЙТЕТ2: АЙ 
EFAS ЙЙЙЙБЕБА4АТЗӢЙТЗ: 12 
EFEBO ТЕ4А4АЙӢТСТӢІВіЕ: 2 し 
BFB8 ЙЙТЭТА4А4ЕЙӢТӢТА: 74 
BFCa 4АТЕЙӢТЕТт2020600:С0 
BFC8 T8TE4ATEBBTEAAGE:F4 
EFDA 60й00й0221С7Ғй08йй0:25 
BFD8 85020782005802078:F8 
ВҒЕЙ 2494454542454454: 81 
EFES 5820500005058207:D3 
ВЕЕЙ 0950502070001414: 58 
6B281C77363E1414:C4 


ゲー ム に は カナ 文字 が 出る し , 音 に 関し 
て は 自信 が あり ます . 頑張 っ て 入力 し て ね . 
また だ たこ の ゲー ム は , 人 の ミス を 引き 出す ゲ 
ー ム な の で , 頭 を 使っ て ね . 協力 (? ) 者 の 
ЖЖ, 山田 君 , 他人 の 水野 君 , 完成 し た よ . 
D x RM 
1) “ポケ コン ・ マ シン 語 入 門 ", 工学 社 
2 ) 後 藤 晴 彦 : "マシ ン 語 エエ ディタ”, Тһе 
BASIC, 5 月 号 , 技術 評議 社 
3) “PC-1250/51 マ シン 語 講 座 
POPCOM, "84 年 7 月 ・8・9 月 号 、 小学 館 


9898222 2 


Сййй 540232DB5002B3DB:T8 

coag 50827aDB5002F9DB:CC 
CALO 88264124272904F1:D8 
(018 E93719F8TH929C52:F9 
C020 117B821E523793402: BB 
(028 SCDB5002F8DBO800B: 67 
(050 24748852414EFF4E:CE 
(058 FF4EFF4EFF4EFF4E: 54 
С040 FF4EFF4EFF4EFF4E: 34 
C048 FF291827008020282: TF 
C95 18F85T1F4EFF4EFF:18 
C858 4EFF84025CDB5082:5C 
C860 F3DB000B24750352:D1 
C868 414EFF4EFF4EFF4E: 76 
CATA FF4EFF4EFF4EFF4E:34 
С078 FF4EFF4EFF29199: DC 
C880 81020218F8591F37: BC 
(088 234025BDB5802B9DB: A1 
C090 58823CDB5002F9DB: 8E 
2098 00222427414EFF4E: 59 
CAAA FF4EFF4EFF4EFF4E: 54 
С АЗ FF29193 イ 4EFF4EFF: 09 
COBA 840290DB5002B8DB: Dé 
COB8 500280EDB5082F8DB: 60 
COCA 0025242541290457:12 
С0СЗ 99FF414EFF29943 イ :F1 
CODO 0080125Ғ10СЙЕТ57:ҒҒ 
CADS 60006111DF6001DF:F1 
СЙЕЙ 43290841290bE3707:2C 
COES 003C18F7FF02001F:63 
CAFO 78С00078С01878С0:С2 
COFS8 C878C82678C04C78:22 
C188 С08878С08С78С0С8:2С 
C188 73BB0037003B18F3:ñD 
C118 8802001F11401F37:C8 
C118 78C180084027FDB86:AB 
C128 02111В001Е78ВС80:СС 
C128 10ВСТЕВ900011886:А2 
C138 9262DBT8BC994EFF: 50 
C128 84821BDB5002BFDB:68 
C140 580227DB78BB8C37:Ch 
C148 10BF27820E5210F8: 70 
C158 Tà88B811F18F32C57:35 
C158 828C523718BF2457:F1 
C160 4264015200й0510Ғ8:й04 
C168 57380702й21Ғ79С4:Ғ6 
C170 8802281Ғ79С488й00:98 
C178 19BF3792385219F8i 9A 
C188 TàB88B811F180F82C57:35 
C188 82805279C48810BF:F4 
C198 8C57740B649F5237: DE 
C198 18F337020000041F:64 
C168 10BB503710BF3557:AD 
C1à8 579B38923719BF34:E6 
C1B9 5767017ҒВ8185700:45 | 
C1B8 19BF35576794 イ FC499 
C1C8 Е410Е83С57670ЕТЕ: 72 
C1C8 В08010С001024052:92 
C1D8 19C9ET92915278C9: 44 
C1D8 D884022CDB5002F8:B7 
C1E9 DB18BF375718C1F0:F9 
C1E8 5264F711F45285D6: DF 
С1ЕЙ 282810053079BD18:C2 


a ———— 


(# R XE OO (8 REB ё A OONATTSUS) 


157 


ei 


PC ガイ ル マシ ン 語 リス ト 


4EFF84639RTFC25: 54 
C200 213869267DB5992: 5C 
C288 ВВПВ847105065784:71 
C218 C7281810BB50D518:07 
C218 4D1167D4FE1168D4:E4 
C220 8010BF80E82815279:AB 
C228 В020065784С72813:С0 
C230 10BB67D4FD1169D4:51 
C238 9919BFgE92945279: AE 
C240 BD208065784072813:C8 
C248 10BB67D4FB1168D4:58 
C258 9919BF9E92945279: АЕ 
C258 BD20865784C72813:C8 
C260 10BB67D4F7116BD4:4D 
C268 9919BF9E92975279: B1 
C278 BD20865784C72813:C8 
C278 18BB67D4EF116CD4: 46 
C280 9919BF9E92975279: B1 
C288 BD20865784C72813:C8 
C298 18BB67D4DF116DD4:37 
C298 9919BF9E92995279: B3 
C288 В020065784С728135:С0 
C288 18BB67D4BF116ED4:18 
С280 9919BFgE92995279: B3 
C2B8 BD2884718679C38C:20 
C2C8 4D4D4D18BB67D47F:6C 
C2C8 116FD480810BF8E82:33 
С200 175279BD20020004:C5 
С208 5284633B3B8610C8:85 
D0182305218BF3657:801 
18C8E75284825CDB: C6 


(508 v8CaCaTSCaCS18BC:CC 
LSE9 TED48B117FD48084: 25 
С5Е8 à263DB5882C6DB58:32 
CSF8 AZAFDBSØA2CTIBAA: 38 
USFS 182426412904F1AF:70 
C608 TSCØCST2BBOATSCA:6B 
C608 C378013878C00878: B1 
C618 CƏC334024BDB5002:86 
0618 C6DB58828FDBS5882:CF 
C620 C7DB881824264129:6E 
C628 4F1HF19C9D19289:CT 
C630 5211Е702040В78С0:62 
C638 Da78C8C878C8C8378:48 
C648 (0С878С0С878С0С8:88 
C648 78B9883727237372T:E4 
C658 3737373737043737:55 
C658 3737373737373131:B8 
C660 5700000011575757:ЕП 
C668 5711695Ғ65115162:39 
C670 55115B595E571127:17 
C678 3737370073C0D010:BD 
C680 C6D5D4883778CBC8:AB 
C688 78С00879В91000йй:4Ғ 


C1B84E154E208030: 7û 
C4E8 4ЕҒҒ41290479С454:52 
С4ҒЙ 11695F6562116353:67 
С4Ғ8 5F62551D80808000: 33 
C500 7T8C18C8402CEDB58:C4 
C508 82C2DB588277DB58:94 
C518 02Ғ8080021242741:82 
C518 299484927FDB8692: 95 
C528 1DDB801E78BC80108: DR 
C528 BC8E0881B218117E:64 
C538 B219849297DB5992:85 
C538 В8)В59870В860208:Ей 
C548 DB8230378BB28379C6:7B 
C548 853700427F7F403E: 7A 
C558 TF417F3E3E ィ F417F:FR 
C558 ЗЕЗЕТЕ41ТЕЗЕЗЕТЕ: B6 
C568 417F23E84453D0504:8D 
C568 4242492918999999:FF 
C578 9999944530959492: 91 
C578 9432949042221224: ûû 
C588 460000808000018C0:16 
C588 D182285211E78201:50 
C598 5278С10С84024908:41 
C598 5082C5DB5082FFDB:1E 
C568 5882F7DB242678C80:66 
C588 D986633B29998492: AC 
C5B8 CEDB5992C30B5992:EB 
C5B8 ?CDB5992F8DB9921: 9D 
C5C9 242741299419C9D1:5a 
С5С8 D48011E702055278:9D 
C508 CapaT8C67CT8CBC8:4à 


3882F8DB820B84D4: AA 
C2F8 FT43299519BF355 了 : じ 3 
C388 75835218BB505742: 7E 
C388 5279C488865784C7: BF 
C318 TCC20518BF345767:D4 
C318 017СС20579С2С310:22 
C320 C0D182105211ET82:EF 
C328 815284827CDB5882:82 
C330 F8UB2599FFd94553: AF 
C338 78С00084654й02900:65 
C340 8402570В50й02ВҒ0В:84 
C348 50021BDB5002F3DB:6D 
C350 0020242641290410:Е8 
C358 С00102805211Е7й2:5Ғ 
C360 125278C0D011E702:66 
C368 185278С00011Е7й02:6С 
C370 125278С00078С0С8:6С 
C378 19BFgF92915278C9: 6B 
C380 C818F83CD48C370E:31 
C388 19129E9E9C9C9797:64 
C390 a8098B8CO9020989:4B 
C398 453686585858585E5:1D 
C368 E8707585806888C0: 34 
C388 8911111111625569: DB 
СЗВӢ SC51691311396938: 9B 
じ 3B8 SE31999H4R3E9998: 22 
C3C0 087С082818424240:90 
C3C8 2013422212244622: 49 
С500 12087Ғй240281й028:50 
4644453095442204: 3B 
424444907۴431908: 90 


969243221E99995E:E9 
じ う F9 9999999999999999: AA 
C3F8 00800000037373737:DC 
C488 78С0Е878С0С878С1:59 
C488 18828010BC8E5211:D7 
C418 SF5219BD17929452: 110 
C418 19BD175743527EB8: 96 
C420 D978B9B192995219: 16 
C428 BF34929999931F19: 27 
C430 BB6899971F78E19C: ЗЕ 
C438 78С14878С00078С0:Ғ1 
C448 C8800209DB10BD17:12 
0448 574519BB595319BF:19 
C450 3602035218BF8F82:6D 
C458 885278BB3478BB70:62 
C460 18BF0F5767002884:D8 
C468 了 9C4184EFF4EFFCE: BD 
C470 ҒҒ4467467ЕС15С67:Ғ2 
L478 437EC17867492806:D8 
C488 78С1482С0478С1А4:8Е 
C488 19BC8EB999911886:B2 
L499 923FDB78BC9g4EFF: 2D 
C498 19BF365742679828: 35 
C488 2819BF3457679928: 1 1 
C488 1B84025CDB5882F8:22 
じ 4B9 ПВ1йВҒ555742670В:Ей 
0488 5805020852040508:70 
С4Сй 45290510ВҒ360204:7С 
C4C8 5210С0Е75278С000:65 
FF446707288818F8:E9 
5С02йС5257674ЙТ7Е:Ғ8 


6? ; h е à 4 
K ےھ‎ as mies! . қ Р ша en _ А. 


@ATARU 

これ は PC-1245 用 オー ル ・ マ シン 語 モ ニ な お , 書き 込み が 終わ っ た ら NEW (i 読み 書き し だ い 先 頭 ア ドレ ス の こと で , & 
タ です. た は CLEAR) を する 前 に . を 付け 16 進 で 入力 し て くだ さき さい. 

SAVEM&C5DO,&C69F 
入力 方 法 О ИЧСЕ ЗЭУ? 使い 方 

まず 。 リ スト どおり 入力 し て RUN し ま | きい . NEW を し て し まっ た 場合 は 。 テ ー 使用 で きる キー と その 動作 は 表 2 の 通り 
+. 8 バイト ず っ 合計 を と り 。 DATA X プ か 6 読み 込む か が 。 プロ グラ ム を 入力 し な T" この 他 の キー は 正常 に 動作 し な い の 
の 行 番号 と その 行 の 合計 を 表示 する の で , I お る な けれ ば な り ま せん . テー プ に セー プ | で 使わ な いで くだ さい . 
れ を 表 1 の チェ ッ ク サ ム 表 と 比較 し な が ら , | で き な い 人 は NEW せ ず に . モニ タ ・ プ ロ 


マシ ジン 語 プログ ラム を 変数 エリ ア に 書き 込 グラ ハム を 起動 も て くだ る きい 。 その 他 
ん で いき ます . 間違っ て いた 場合 に は 。 を 起動 方 法 プロ グラ ム の 縮小 に の み 専 念 し た た め , 
の 人 行 番号 の DATA 文 を 見 直し , 再び RUN , 多少 使い に くい と ころ も あり ます が , ブロ 


ғай <р АА; 起動 の 方 法 は , 以下 の よう に な り ま す . グラ ム の 入力 に は 間 題 な に と 思い ます . 
"El Sim y: Д CALL&C5DO, 先頭 アド レス Nd; この ジジ ログラム はり ロケ ゲー タブ ルレ 
| | 先頭 アド レス と は , この モニ タ を 使っ て に な っ て いま す 
z um | PC-1245H マシ ン 語 モニ タ 
160:0АТА &F1&EE5&13,&1C 


18:DIM 2(4› 


5&2F5&29&F15&RF 


20:FOR Z(1)= TO &CF ‚ «82, &0А› 64, &ЕС 280: АТА &FD&9D&67&99 
STEP 8 1780: DATà &F1»&E95&D65» #82 :&$285 $025 &37 5 &F8 
50:2(23-0 :$075:&1B» $065 05 298: DATA &99, &75, &0Е, 238 
40:FOR Z(3)=Z(1) TO Z(1 ||180:DATA 602,&035,&54,&24 5&155&425&385&19 
)+7 э &26›&2Е, 4035,84 500: DATA &42, 438,504, 242 
38:RERAD Z(4): IF Z(4)=9 | |190: АТА %60,%Е8,&02,807 :&285: $12: 03, &00 
99 END ‚ &34, $035 $005 595 510: DATAÀ &92&98,&84&15 
60:POKE &С500+2‹3),2(4) || 208: DATA. &245 $825 &445 &2F , &04, $045 494, &04 
70:2(2)=2(2)+2(4) : «04, DAs 26,5035 320: DATA &04, $05, &Е2,200 
. 80: МЕХТ 2‹3) 210:0АТА &C7:&02: &BFs&F1 ;&D1»&2D5$&985&75 
98:PRINT 2(12/8ж10%120, y&E9&92&RFs&F1 330:0АТА %54,%67,%08»63й8 
2529 220: DATA %ЕЕ»%023%06:5234 » $835 &755 &07 5 &D1 
188: NEXT 2(1) &92&g1 5&34&86 || 340: АТА &10, &С6› &EA, &D6 
118: END 250: DATA &63:&B3:&28, 306 :&01: &F85 £99, £05 
書き 込み を 行なう 120:DATA &19&C6&B1&84 y&925&11&26&21 359: DATA %04:%58,%07,%00 
‚518,04, 6Р2, #05 240: DATA &09›&63,&ВС,&28 804: &0F 5 £585 &2C 
i 130: DATA &F?5&2758125 $28 :&855&025 &1D5 &2D 360: DATA &035;&D4»&F0s&DAÀ 
4 バイ ое *&9C5&9R&F8&99 250: DATA &04› &24, &0А› $82 :&575&835 &47, A 
4 バイ ト ダ ウン 148: DATA &84,&59,&64,&93 , $005 £83: £005 &91 3780: DATA &52;&3B»&BCs&2D 
1 パイ ト ア ッ プ ,&825&C4,&74,&B5 260:DATÀ &1D5&745&405&67 ; $205 &$80: 280,200 
1 バイ ト ダ ウン 158: DATA. &10,&С6› ЕА, #52 »%48» 23А, &93 &74 380: DATA 999 
BASIC (с (898 ‚403, &С7›&02,&С1 210: DATA &97&265&2F,&19 


"S > 今日 は 。 ば ん ぶ き ん ば ぱい です. 3 月 な の PiOBOX に 僕 の 出し た バッ ファ リン グ の 記事 を 載せ て いた だ きま し た が 。 ZNEBI LAUH 
Ол © し を し て お きま す 。 27. あの 記事 の 中 で 扱い が と し て 「 キ ー と メイ ン の 方 で 」 と あり ます が 。 あ れ は 「KEY [j k2—vL сесли 
ば いけ ませ ん . また この サ プ ブルー チン は ,。 メイ ン ・ ルー プ の 中 で す 固 ルー ゲ ず る さよ と に. 1 度 ず つ コ ー ル し て や れ ば よい の で す . 1 回 呼ん で 


© 
\ 
158 Ce U55727MT-AXCt»v bl, リモ キット きれ ます か ら 、 そ の デー タ で 判断 し て くだ さい . そし て 。 その ルー プ の 中 で 他 の 判断 を し て いる 問 に 


PC-1251 


BASIC (ポケ コン パイ ラ 1251) 


の c AS 
Bu R#E 

私 は ある 日 考え た .「 ス クロ ー ル ・ ゲ ー 
ム を 作ろ う 」 と …. そう 思っ た 私 の 前 に 出 
現し た の は ポケ コン バイ ラ . 早速 作っ た の 
が この ゲー ム で す . 

開発 は PC-1245 で 行ない , 実行 お よび コ 
ン パ イル は 友人 の 1251 を 借り まし た . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC (ボケ コン パイ ラ 1251) 


まだ メモ リ が ある の で , ボー ナス ・ 
ステ ー ジ な ども 付け て ほし か っ た で 
すね . (0) 


й=2 
140:жС: ОРЕ 1,0: 
THEN D 
SB:LET 1+1=1: 
168:*D: OFF Y:6: 


千葉 県 жне 


リ バー 


LET AST: LET 8+1 
IF 2<=1 


5070 C 
INKEY$ 


A (279-492 


に ちょ う せ ん だ . メ 


福岡 県 アザ ワ 建 人 


難し いと 思っ だ た だら, ラベ ル J の と ころ を 
消し て くだ さい. 非常 に 簡単 に な り ま す . 


| 最後 に 


PC-1251 を 借 し て くれ な た 石井 君 ど う も あ 
か あと 5742 A 

それ か ら メ モリ は まだ 100 バ イト ほど と 余 
り が あり ます . どん どん 追加 し て , この コ 
LISA TX AULAM oU. 

lis, 未 使用 の ラベ ル は S か ら 双 まで あ 
53. 
eL RÁ 
Ka : 
84 年 12 月 5 


スト どり に 入力 上 て コン フィ オキ MM も も 
(278, 実行 する と ,。 タイ トル を 表示 し , 
音 が 鳴り 。 す ぐ で ゲー ム が 始ま り ま す . 


空白 の 下 の 方 に ある ドッ ト が 自分 で す . 
[1 | [3| で 左右 に 移動 し て 障害 を よ け て く 
だ さい . 自分 は 1 つ で すか ら , 当 だ れ ば 即 
ゲー ム ・ オ ー バ ー と いう こと に な り ま す . 


改造 


RIT SIA TI O 


RIVER ソ ー ス ・ リ スト 


ОМ 85.8 


187:*E: тд? ñ: IF ñ=65 THEN H ИЕ 5$32335:515$:185$:50$ 
188:x*6: LET 48=% 1780: IF ñ=67 THEN I 238:PEEK Y=ñ: LET А АМ 3680:*0: INKEY$ ñ: IF <> 
110:жҒ: LET B=I 1388:60T0 J 96=й: IF ñ<>B THEN M 185 THEN 0 
128:*à: DN 150: IF 59 く =I 198:xH:Y-12Y: IF 1>Ү 2T8:0N Үзб: ON Үз5: LET zTA8:60T0 P 

THEN B 5+1=5: IF S=199 THEN || 400:ж0: LET H*1-H: LET B 
125:LET 1+1=1: GOTO ñ 0 =5: GOTO R 
138:*B: IF TX は D 298:*R: GOTO H SAA: END 


500: М: BEEP 128,40 

358:PRINT 99$:82$:925$:323 
3:85%:52%:Н:558:65%) 
64$164$353$:353231$; 

355:PRINT 96$:22$:315:18 


THEN L 
205:60T0 J 

210:*K:1=Y: 
220:*L:56=Y 
225:*J: RND 


5070 J 


a»*1-0 


38-285: 


グー サン @ m Pul t 
埼玉 県 春 高 の アン ドア ・ ジ ェ ネ シス 


また バッ ファ に は デー タ が た まり ます か ら ,。 それ を また ルー プ の 先頭 で 「KEY []」 を コー ル し て 読み 出し て や る と いう こ と を 繰り 返せ ば い 
сост. 説明 が へ ヘタ な の で よく わか ら な い 人 も いる か と 思い ます が , そう いう 人 は 迷わ ず 「 マ イコ ユン ・ 人 生 相 談 室 」 へ (無責任 な …). 


(キー 入力 に こだわ る ば ん ぶ き ん ぱい ) 


1S9 


Q 


PC-1261/80/45/55/51/50 


BASIC 


ソラ イノ フラ イア 


say 


君 は 茶 D 航 空 の 機長 で す . ある 日 の ワラ 
イト の こと で し た , その 日 の 乗客 は ほぼ 満 
ATL. そこ へ 急 に 後方 より 追撃 を 食 ら 
っ て 尾翼 の 調子 が お か し く な っ て し まい ま 
し じ し た :。 

そう 君 は 某 S 国 の 領空 を 侵犯 し て し まっ 
た の で す . 後ろ か ら は S 国 の 誇る 戦闘 機 が 
追っ て きま す . と に か く ミ サイ ル を よ け て 
逃げ て くだ さい . 幸運 を 祈り ます . 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


割 と 単純 な ゲー ム で す が , スピ ー ド 
も 速く (。 な か な か 良く で き て いる と 


PC-1260/61 の 方 は に この まま で よい の で す 
23, РС-1245/50/51/55 ОУ Жон жин 
UT CIS 
@101r 0 A = &2037 £ A = &F837 
915í10---&2005 22 & F805 
930 行 の …&200A を &F80A 


[DEF||[Al で ゲー ム ・ ス ター ト で す . タイ ト 

ル 表 示 後 すぐ で す の で 気 を 付け て くだ きい . 
ミサ イル は 最上 段 と 中 段 と 最 下段 に ラン ダ 
ム に 飛ん で きま す . 


|18: “A” ВЕЕР 1: PAUSE " 
FLYI FEYI"』 CLEAR ? 
WAIT B: PRINT 99: 
RANDOM :4=&2037 

15:РОКЕ &2005› 28,3›23,1 
27.8 

20:В- RND 35C28^CB-1) 

39iFUR 1=&299R TO А 
STEP 15 

48:IF [=й THEN 69 

98:POKE IsB C C Ca B: 

G0SUB 175: POKE 1,0, 

B.B B D 


8 


1»96.72, 


250: GÜTO 55 
38:60T0 1680 


p や は り , 


Anh FLY! 


55:МЕХТ I:HzH*5: 


68:0N B GOTO 100,70, 130 
Ti IF Z$-"1" THEN POKE 
120»72,64: 
GOSUB 228: GOTO 55 
88:IF 2%-”5” THEN POKE 
1»5»9»15,9,1: GOSUB 


188: IF 28-71” THEN POKE 
1»96»65»113»65»64: 
G0SUB 22й0:Н-Нж2: 


まっ た く 無 関係 で は な か っ た の で あっ た . つま り “こむ ぴ う た あ " 
いっ /」 と いう よう な 文章 を 何 度 か 読ん だ こと ある し 「 必 殺 の LP を 云々 」 と いっ た の も いく つか あり ま Аа 
BUNNYMEN が 好き っ 」 な ん つ ー の も あり まし た . 
だ の で お わっ だ PS 


タイ トル 表示 , 初期 設定 
戦闘 機 表 示 


ミサ イル 発射 ルー チン 
ミサ イル と 自 機 が 重なっ た と き の 処 理 
ゲー ム ・ エ ンド の 処理 
自 機 移動 ルー チン 
キャ ラク タ ・ デ ー タ 
右 が 君 の 操縦 する ジャ ン ボ で て 左 が S 国 の 
戦闘 機 で す . キー 操作 は |1| で 右 旋回 ,|5 | 
で 左旋 回 で す . また 前 に も 示し た よう に , 
尾翼 に 追撃 を 受け て いる た だ た だめ ジャ ン ボ の 反 
応 が 少々 遅 め で す . 
ミサ イル は 1 発 ず つ し か 飛ん で こない の 
で な る で く 早 目 に 逃げ ば て くだ さい (GEI b 
десе ЕО РГ, > кшк Сет 
{ХЭЛ o sb T SoTL МО) 
で す が 。 この ブログ ラム を マシ ン 語 で 組め 
ば こん な こと も 無い の で は な いか と 思い ま 
3 ). 
と に か く こ の ゲー ム の 主旨 は , 
を か わし て 人 透 げ る と いう だ け で す . 


初め て 作っ た ポケ コン の グラ フィ ッ ク ・ プ " 
ログ ラム な の で , 玄人 の プロ グラ マー の 人 
が 見 る と 無駄 ば か りか も し れ ま せん が 。 H 
分 で は 満足 し た 方 で す . プロ グラ ム は 見 れ 
ば だ いだい わか る と 思い ます が 。 АЙЫ»; 


ミサ イル 


自 機 の 位置 
ミサ イル の 位置 (上 か 中 か 下 か) 


ミサ イル の キャ ラク タ ・ デ ー タ 

スコ ア 

ルー プ ジ 用 

キー 入力 用 
番号 マッ プ '。 表 2 に 変数 表 を 載せ て お きま 
а аи ҰРА 

2/0, まだ いく ら か メモ リガ が 残っ て いる 

と 思い ます の で ,。 どう と で も 改良 し て みて 
E dco 


実は この プロ グラ ム PC-1261 で 作っ た の 
で す が , よく PiO の ポケ ュ コン 用 プロ グラ ム 
を 見 て 思う こと に , PC-1245 用 と か PC-12 
51 用 と か の プロ グラ ム も , ちょ っ と 手 を 加 
える (LCD 表 示 の POKE ア ドレ ス を 変え た 
b, 変数 と 変数 の か け 算 の 記号 を 入れ た り 
“) こと に よっ て , PC-1260/61 で も 動く こ 
と が 多々 ある こと が 挙げ られ ます . EDE 
を も し 知っ て い だ ら 書く さき で は いで し ょ 
297 

あっ 忘れ て まし た か が, ミサ イル を 上 離れ て 
CAR ( 例 : 右 に 来 た と た と き 左 に よ け る ) と 
得点 が 加算 きれ ます . 


5070 55 
110:ІҒ 2$-"5" THEN 168 
120:РОКЕ 1,28,9,63,9›,8: 

GOSUB 218: GOTO 55 
130: IF Z$-2"1" THEN 168 
140: IF 2$-"5" THEN POKE 
I*356557156551: 
5USUB 250:Н-Н%2: 
5070 55 


5070 2 


9 


8: GOSUB 218: GOTO 
5 
168:FÜ0R К=0 TO 3: 


POKE 


邦楽 洋楽 を 問わ ず , 
「 ど うい うふ うに 関係 が ある の か 」 と いわ れ て bè, 


ШШ FLY! FLY! BASIC リ スト - waw 


77:18»72,45,84: 
J=9 TO 28: NEXT J: 
POKE А»5й»109,55»84, 
43: FOR 7-0 TO 28: 
NEXT J: NEXT K: BEEP 


178:PRUSE "***GñME OVER* 
жж”: PAUSE " SCORE-" 
íH: 
150:РОКЕ 1,28,72,126,72›, 175:2%- 
180:ІҒ 2%-”” THEN 210 
198:IF Z$-"1" THEN 220 
9: IF 2%-”5” THEN 2380 


E pex 


この よう な 文章 が 載る と いう こと ょ と は や は り 。 


FUR 


210:РОКЕ й,28,8,62,8,8: 
RETURN 

228:POKE 8»96%64»112»64» 
64: RETURN 

250:РОКЕ й,3,1,7,1,1: 

RETURN 


な ん で すね ー. 


PiOPiO で 「 谷 山 浩子 は い 一 
"THE CURE EECHO&THE 


まっ だ さく 無関係 で は な 


「 個 人 的 に 好き だ か ら 」 な ど と は 指 が 骨折 し て も 書け な い . 


РС-1261 


BASIC Y 772 


Tre 


MAHJONG 


. 役 判定 を こなす 
も の と し て は , 世界 最少 の 「THE MA- 


PC-1261 用 の 麻雀 で す 


HJONG 2 」 を , ここ に 発表 し ます . 
圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 5ECO—62FF 


|!!! 


ボケ コン で 本 格 的 麻雀 を 作る の は 難 
し いで す が , これ は な か な か 良く で 
き て いる と 思い ます . (Ta) 


まず マシ ン 語 部 (リス ト 2) を 入力 し , 
CSAVEM& 5EOO, &62FF| ENTER | に し した 
後 。 BASIC 部 (リス ト 1 ) を 入力 し , 必ず 
バッ ク ・ ア ッ プ を 取っ て くだ さい . 

= 


次 か ら は 確認 音 付 き で や 
り た けれ ば | DEF [5], そう で な けれ ば 
[DEF |[zZ| で だ スタート ミ る せ て くだ さい . 7 
ー ム は 東南 の 2 巡 で す . 得点 と 親 ・ 子 が 表 
示 き れる と き に , 右上 に 表示 され る の が ド 
ラ ( 現 物 ) で す . そし て , 約 15 秒 で 手 が 表 示 


最初 は KUN, 


Ти; 

手 は 左 か ら 6|AllB|…|N|E 割 り 当 て られ 
て なり, ツモ る と き は 13 枚 の と き ( つ まり 
ッ モ る 前 ) の , 14 枚 目 の キ ー を 押し て くだ 
о, また 捨て 牌 は , "DEG の 表示 が つ 
いて か らい ら な いも の の キー を 押し て くだ 
atv. 


G 2": CURSOR 24: 
PRINT "RECORD "5 5: 


Ww 


を し て チー を し た いと き は , # | 
ー を 押す と “RAD" 表示 が 消え る の て 
その 後 作り た い 順 子 の 最小 に な る キー を 提 
し て くだ さい . алеу, [Ја 
TEDT SOTT, 

それから カ ン の と き は , |O| キ ー を 押し 
て か ら カ ン を する 牌 を 指定 し て くだ さい . 
暗 カ ン の と きも 明 カ ン と 同様 に |O|I キ ー を 
押し て , "DEG" 表示 が 消 を た えて か ら カ ン す 
> РІНЕ (С (HSL. 

リー チ を か ける と き は | 一 | キー を 押し て , 
リー チ 棒 が 表示 きれ た ら 捨 て 牌 を し て くだ 
зо, 押し 間違え た と き は , も う 一 度 押せ 
ば 解除 きれ ます . まだ, ツモ 時 に 自分 の 訂 
が 見 た いと き は , Па енто 
わり ます . 

を そして, 上 が っ だ と き は アタ マ に する 衣 
を 入力 し て くだ きい . この と き | 多 以外 の 
キー を 使っ て くだ さい ( 1 回 だ け 押 す )。 & 
の 後 |*] キ ー を 押す こと . 

な お , チョ ン ボ は 連 荘 , 子 が 和 る か 流 局 
時 に は 親 が 移り , 2 巡 す る と ゲー ム ・ オ ー 
バー で す . 

—! 
最後 に 
«ше 
бы 22 

ゲー ム に 関し て は , 昨年 11 月 に 作っ た 
Ver. 1 の ロー ド が で き な か っ だ の に 端 を 発 
L, マシ ン 語 利用 に より 役 判定 で 15 秒 。 & 
示 ・ 並 べ 替 え で 15 秒 の スピ ー ド ・ ア ッ プ に 
成功 し まし だ . 

この 役 判定 シー チン に は 自信 が あり ます . 
細か い 点 で は ロー カル な 面 が あり ます が 
を こ は 4.500 バ イト の ルー チン . こら えて 
dE Ыр 


TÜ 33:P$íG)z2"": NEXT 
POKE 26242, &В0: 


ex co cn 
a 


-- 


š : CURSOR 
г "THE MAHJION 


(グリ ー ン ベレ ー 影丸 ) 


STR Is" BY 7:09 
49:CALL &11Е0:ТА=0:С0=0 
50: RANDOM :И=й: М5 ="°" 

Мей: CLS : FOR 6-8 


РОКЕ &6246,&4Е: CALL 
&52480 

55:М=4: IF C0-8 OR (0-2 
LET M=6 


CERE һы, 


ナ キ 処理 は 10 秒 以内 , 
秒 以 内 に 終わ る と 思い ます が 


ааа: 


役 判定 は 20 
それ 以上 か 


か る と き は 凌 走 処理 を し て くだ さい (リセ 


» F). 


CLS : CURSOR 5: 


PRINT 


"SCORE "3 


プレ イヤ ー の キー 入力 

コン ピュ ー タ の 手 , キー 入力 
コン ピュ ー タ の 上 が り 処 理 
フリ テン 表示 


, 国士 無双 判定 


Жу, チー, カン 共通 処理 ルー チン 
ポン 処理 

カン 処理 

ポン 時 の 基礎 点 処 理 

流 局 , ALAR, ゲー ム ・ オ ー バ ー 処 理 


表 2 


STR$ 


アー ドレ ビズ で ルプ 


捨て 牌 表示 

牌 ソー ティ ング 

コン ピュ ー タ の 手 を , プレ イヤ 
ー に 転送 

フリ テン 判定 

流し 満貫 判定 

各種 デー タ ・ エ リア (入力 不要 ) 
役 判定 用 前 操作 

「FLAG」 を 立て る (600FH) 

「 字 一 色 」 

「 清 一 色 」 

「 タ ン ヤ オ 」 

「 混 一 色 」 

「 ド ラ ・ ウ ラド ラ 」 
「 大 三 元 」「 小 三 元 」 

「 大 四 豆 」「 小 四 豆 」 
FE» 3 

型 判 定 お よび 基礎 点 
判定 

「 チ ャ ンタ 」「 ジ ュ ン チャ ン 」 
「 清 老 頭 」「 混 老 頭 」 

表示 ルー チン 
デー タ の 初期 化 

牌 デー タ 


・ 刻 子 の 数 


ТА: CURSOR 33 
66:IF М=6 PRINT “ЯР” 
THIF M24 PRINT "3h*t" 
T8: TUzü:FU-z&5FEF*CMzÓ): 
RC-2* RND 18: IF RL: 
5 LET RC=2S 


161 


414 


リス ト 1 THE MAHJONG 2 BASIC リ スト 


8a:DCca»-8:Diclo-8:DO- F<>B THEN 320 
RND i4x«5-5:UD- RND 3 || 358:IF Үӛ-”.” GOSUB 70% 
4«5-5:U-D0*&624B IF K=1 THEN 140 

82:РОКЕ %2857» PEEK U, 3eB:IF Y$="+" 5HSUB "C": 
PEEK 0+1)» PEEK ¿U+ IF K=1 THEN 140 
2). PEEK ¿U+3)s PEEK || 378:IF Y$="0" GOÜSUB 709 
ШЕСІ IF К-2 THEN 148 

84:P-&SFF8:G-8: FOR В-й || 388:60TO0 228 
ТО 3: IF РМ 3-1 488:BEEP S0:KI-20:X-1:L- 
THEN 98 13: CLS : CURSOR 28: 

86:R- RND 25-1: IF (Р/9 IF Ізі PRINT °ч": 


1730:РОКЕ %6й97.В: CALL 
&688F: IF PEEK Уі 
LET М%(й2-М%8(й09472 
L4" "INZNT2*N 

17480:60T0 1388 

1750:ІҒ X-8 THEN 1300 

1768:D- PEEK 2: POKE %5 
F3C:12: CALL &5F38 
: FÜR 622 TO 11: 
IF PEEK (2%0)-0%5 
LET D=D+5 


THEN 1248 

1238: IF D+15= PEEK (G*Z 
? LET BzB*1:DzD*15 

1240:NEXT б: IF B-2 AND 
(В-3й0 OR 2-75 OR D 
=120) LET NzN*1*X: 
МС) =М$ й) +” 4^ 
“: GOTO 156868 

12598: IF E=9 LET E=1:D= 
PEEK &SFB3: GOTO 1 
228 


= PEEK 2+5+1) AND 
PEEK (2%03%5- PEEK ( 
2+0+4) LET ñ= PEEK € 
2%6%4): POKE Z+5+4, 
PEEK (2%0%6): POKE Z 
+D+5 +ñ 
84Й:ІҒ PEEK (ご + ロ )= PEEK 
(2%6%1) AND PEEK ¿Z+ 
б+2›= PEEK (Z+5+3) 
AND PEEK 2+6+4)= 
PEEK (2%б6%5) THEN 84 
ri 


= INT (К/922%9> OOTO 428 1268:E-8:]D- PEEK 2 1770:МЕАТ б: IF D-B-48 
THEN 86 318:PRINT "n>": CALL &5Е||841:й= PEEK (2+6+2): 127T8:B-8: FOR б-й TO 9 LET М$‹Йй)=°+40,,1° 
8T:IF VRL P$¿(R)>3 DR BB POKE 2*G*2» PEEK (2% STEP 3: IF PEEK (Z 7k9** GOTO 7ү” 


YAL CP$CR*125253 ПЕ 
YAL P$CR*2253 THEN 8 
6 
88:ҒОР R=R TO R*2: 
505МЕ 11010: 6=6+1: 
NEXT В: GOTO 94 
9ü:R- ЕМІ 34-1: IF YAL 
P$(R)><>B THEN 98 
32:FÜ0R H=B TO 2: GOSUB 
11818:6-6*1: NEXT H 
94:NEXT B 


0+2): POKE 2+б+3,й: 
GüTO 858 

842:8- PEEK 2+5+1):В= 
PEEK 2+6+2): POKE Z 
+б+1, PEEK (2%6%5), 
PEEK С2+6+4): POKE Z 
+5+Z, ñ B 

845:IF #=1 LET М%(й2-М%( 
й3%%4-%84192 ":NzH-*1 

85B:NE#T G: POKE %623Е›,Й 
sB: CALL &6126: IF 


1888:IF К=2 LET N=N+1:M 
$Ca»zM$COD e "Us. 


428:CRLL £&£SF51: GÜSUB 68 
Әй:С0-Г0%(М-6):М--4- 
(М-4ож2 

438:L-12:W-8:F-TU-RC:RE- 
ТШ: GOTO 755 

5BB:CLS : CURSOR 28: 
PRINT "コリ キッ YE POKE & 
SF81:&C7: CALL %5ҒЙЙ 
: GOTD 8218 

T88:"5" CLS : PRINT "797 
9212/аз793”: CALL 262 


+G)= PEEK (2+6+2) 
THEN 13288 
1288: IF PEEK (2+ ロ 5)=H+45 
| LET D-D*45:B-B*1 
13880:NEXT 6: IF B=? LET 
МСИ) =М$(0)+° #22037 
":М=М+1+х: GOTO 1 
550 
1318:IF Е=0 LET Е=1:р= 
PEEK &SFB3: GOTO 1 
278 


1885:D-8: FÜR б=ӣ TO 9 
STEP 3: IF PEER (2 
%02<> РЕЕК (Z*6*2) 
THEN 18318 

1886:D-D*( PEEK (ご +5)=1 
552%% PEEK (2%б2-1 
45- INT ¢ ABS M73) 
*5)+( PEEK (Z*6)51 


36:R= ЕМІ 34-1: IF ҮЙІ 17 PEEK У=й DOTO "H" 1358: CRLL &61à8: IF 38) 

P$CR)?1 THEN 96 SBS:X-CL-13 DR 58-й):С0- || 360:КІ=КІ+ PEEK &623E:C- PEEK V-1 LET M$(0) || 1819:NERT G: IF D58 ‘LET 
38:6-&C: GÜSUB 11818:R0 С0%%М-4? 4- РЕЕК &623F -М8(0)%%у-12%е) 7: М%(йЙ)-М%(Й) “рл” 
4 710:Ү- ASC INKEY$ : IF Ү|| 865:РОКЕ &61CC,&38: POKE М-М%2%Х: GOTO 1500 + STR$ D:N=N+D 
: -1: РОВ G= TH =й THEN 718 &SFBE: PEEK &SFBD - 1360:РОКЕ %61СС,%2й: 1820:ІҒ N=B GOTO "H° 


"А": NEXT ||Т72й0:Ү-Ү-65: IF ҮН OR Үс 
12 THEN тій 

T34: BEEP 50: CALL &843B: 
FOR б-й TO L: IF 


STB:IF Т0+4М=4)=20 LET N 
=М+1:М$(00)=М$(й) +" 
TÁ " 


888:FÜ0R 6-8 TO L-2 STEP 


18380:0-8: POKE &68BD:D0 
: CALL &6ЙВ3:С=С+ 
PEEK V*DcB» 

1848: IF Ғ<>2й POKE %6BBD 


CALL &6140: IF 
PEEK У=1 LET Méca» 
-М%(00%%в/9 ":NzN 
%1%Х 


118: CALL &SF38: CALL &62 
17:J=B: IF M=4 THEN 


260 PEEK CEG SPEER (2% 3: IF PEEK (Z+5) く > 1588:IF C43 THEN 1688 «ШІ: CALL &68B3:C- 
1350:1Е TU»19 THEN "В" Y? AND Y<>G THEN 745 PEEK (2%0%2) THEN 39 || 1585: IF T=3 LET NzN*2:M C+ PEEK V«Dc1? 
135: DEGREE :Pz2:62L: T48:NEXT б: GOTO 2200 a $ica»-zM$Cao e" tono» 18580: IF C?8 LET М%(йҙ-М 

745:й- PEEK ©27+5):В= 885:ІҒ ¢ PEEK (Z+G)=R*5 $(0)*" 77+ STR$ 


bUSUB "A": CALL &621 
ї 

148: DEGREE :7Ј=1:Ү$= 
ІМКЕҮ% 

145: IF Y$="1" РОКЕ &5Fg1 
s&LT+ PEEK &5Fg1=&C 
T)*28: CALL %5ҒЙЙ 

198:IF Y$="ü" GÜSUB 909 
5070 148 

199:IF Y$="*" THEN "G" 

158:IF Y$z"" THEN 148 

179: IF Y$i2"-" DR SACOB 
THEN 288 

138:IF F=B POKE &282D:62 
73,62: ВЕЕР 50: 
CALL &B43B:RE-TU:F-. 
3: GOTO 140 

190:ІҒ F=.5 POKE &282D:ü 
sB I B:F=B: GOTO 140 

200: Y= ASC Ү%-65: IF LY 
OR «Ғ>.5 AND L<>Y) 
DR ҮЙ THEN 148 

205:РОКЕ &5ЕЙ1,&С7 

210:К=й:А= PEEK CEY: 
РОКЕ と +Y』 РЕЕК (2%) 
:б=ї: POKE &5FC8+TUs 
A: CALL &5F00:TU=TU+ 
1 

220:РОКЕ 2+1, 170:6=1: 
CALL &SF38: CALL &62 
17 

240:ҒОВ G-8 TO 58: NEXT 
б:7-0: IF F<>0 LET F 
=F+。5 

258:FU-FU-1: IF TURC 
AND RU=RZ5 POKE &SFF 
Dsñ: GOTO 400 

299:IF М=4 AND TU>13 


PEEK &Y*25:L2L-1: 
POKE Z+G:170: POKE Y 
%2,1ҮЙй 

198:6215: NEXT 6: IF J=B 
POKE %5ҒТ5»РВж5: CALL 
%5Ғ6Т: IF PEEK 『=1 
THEN 6йй 

755:РОКЕ &5Е3С, 10+ =12) 

) ж2: CALL &5Е350: IF L 
512 FOR 5=L TO 11: 
POKE 2%б» PEEK (ご + ロ + 
122: NEXT б 

758:ІҒ SGN M POKE %5ҒВС» 
ñ В 

T6B:FOR G-8 TO 9 STEP 2: 
IF РЕЕК (2*622175 
POKE 2%б. PEEK (ご + ロ + 
22» PEEK (2%6%2) 

Т65:МЕХТ G 

T88:POKE &623Е,0,0: CALL 
%5126: IF PEEK り =1 
THEN 360 

785:ҒОР 6-8 TO 9 STEP 3: 
IF PEEK €Z*G)- PEEK 
(Z*G*2) THEN 858 

ТЭЙ:ІЕ PEEK (2%6245- 
PEEK 2+6+1) AND 
PEEK úZ+5)+1B= PEEK 
(Z*65*2) THEN 858 

8BB:IF 65-29 LET 6215: 
NEXT б: GOTO "H°" 

81B:IF i PEEK &£Z*6545- 
PEEK 2+6+1) AND 
PEEK (2%0%12- PEEK ¢ 
2%0%5) AND PEEK (2-6 
+3)+5= PEEK 2*6*4)) 
=й THEN 815 


AND Ј=0)=0ӣ LET М=М+1 

SIA NEXT G:KISKI*2*CC&5F 
BE=135)+( PEEK &5FBC 
215854 PEEK &5FBC-14 
9- INT <М/3)ж5): 
CALL &5ECg 

388:IF Г-й AND Х=1 AND K 
І=20 LET М%(02-М%(Й) 
*"E*52 ":tN-N*1: GOTO 
218 

9385: KI-KI*2*J 

918: IF J=1 AND Х=1 LET M 
$00)=М$(й)+°чЕ ":N-N 
*1 

915:ІҒ Ғ-й THEN 930 

328:IF RE=9 LET М%(й02-М% 

1 (B)*"59"2*4 " i NZN41 

925:M$CO»zM$CDOD) *"U-* "iN 
=N+1: IF Есі LET M$: 
a»zM$CBOD*" 4i" " ":N- 
N+1 

950:РОКЕ %2857» PEEK U, 
PEEK 0+1), PEEK ¿U+ 
2), PEEK 0+5), PEEK 
CU*42:U-2&624B*UD 

955:РОКЕ %2852» PEEK U, 
PEEK «У%1)» PEEK ¿U+ 
2), PEEK 0+3), PEEK 
CU*4) 

34B:IF C<>4 THEN 1200 

345: NZN*2: M$COD 2M$CODO "E 
ам” 

358:IF Х=1 AND (7-1 OR 
PEEK &5FBH=R*5) LET 
М8(йЙ3-%277219%: GOTO 
>.” 

368:IF Т-4 LET M$CÓ»-"2^ 


じ iN=N+ じ 

1378:N=N+2:KI= INT СКІ 
+9+‹х=1 AND J=B)+*1 
a»210»*18 

1875:5= INT (КІж2е INT 
N* ABS M^1880*.95*1 
BB* SGN M: IF ABS 
S» ABS (2ЕЗжМ) LET 
S=2E3*M 

1388:CLS :М№ ІМТ &(N*.5? 
: PRINT M#¿úB): 
CURSOR 31 

18980: IF М212 LET S=6E3* 
M: PRINT "#2" 492" 
%: GOTO 2888 

1388: IF N29 (ЕТ 5-4ЕЗжМ 
* PRINT “сіз ғы: 
5070 2888 

1918: IF Ns7 LET 5=3E3*M 
: PRINT “пзу”: 
5070 2000 

1920:PRINT TEI STRE K 
15° (27: SPRS (2^N 
25 

2888:PRINT "="; STR$ 
RBS 5 

2018:CRLL š11EB:Tñ=Tñ+S 
: IF С0<4 THEN 58 

28280:60T0 608058 

2100:7Ү” CLS :5-8Е5жМ: 
PRINT М8(0):% ғо 
v="; STR$ ABS S 

2118:G0SUB 6000: GOTO 2 
aia 

6800:PÜKE 86242» ВЕ: 
POKE &6246,9: CALL 
56240: CALL &6217: 


1518: IF W=3 LET NzN*2:M 
$ia)-zM$CaDo e" IPI? 


1528:E-8:D- PEEK 2 

1538:B-8: FÜR 6-8 TD 9 
STEP 3: IF PEEK (Z 
+0)<> PEEK (24642) 
THEN 1558 

1548: IF PEEK (2%0)-0%45 
LET DzD*45:B-B*1 

1598: NEXT G: IF В=2 LET 
М%(й0)-М%(йЙ)%%"ууа? 
К?л? ":NzN*2: 
GOTO 1600 

1568:IF E-8 LET E=1:D= 
PEEK (2%5): GOTO 1 
530 

ЇБЙЙ: CALL &6868: IF 
PEEK "=1 LET M$(0). 
-M$ca8»*"3,P3 ":NzN 
+1 

1610: CALL &68D8: IF 
PEEK Y=3 LET М$‹й) 
z"9*4*,7*5": GOTO 
"m 

1628: IF PEEK У=2 AND 
PEEK &5FBD?158 LET 
M$ca»zM$Ca»*" sant, 
T^y "SINZNE2 

1638: CALL &68E8: IF 
PEEK V24 LET M$iġ) 
-”4294%92%: GOTO "Y 


16548: CALL &6838: IF 
PEEK У-1 LET M$(0) 
z"9)4499": GOTO "Y 


v 


THEN "R" 811:à- PEEK (246425: луч”: GOTO "Y" 17@й:1Е М=6 AND J=1 AND RETURN 
260:РОКЕ &5ЕЙ1,&ПВ: CALL POKE 2%0%2» PEEK (Z«||998:CAÓLL &6188: IF PEEK зы LET "neto 8880:"H": CALL &5F38: 
&5Fgg 6+4): POKE 2+б+4›й: У-і LET M$C ロ 5=" キ っ ロト 59%: GOTO "Y IF = THEN 8200 


1T85:IF М=4 AND J=1 AND 
Tuza8 LET M$¿(0)="+£ 
127: СОТО "Y" 

1718:IF TU<=1 AND Ј=0 
LET М%(й)5%у229% 


2T8:P-FU:G-0: DÜSUB "A": 
IF Е-Е0 POKE &SFFD:*R 
*5:J=1: GOTO 488 

288:IF TU-RC BEEP 50: 
CALL &843B: POKE %28 


GOTO 858 

815: IF € PEEK (Z+G)+5= 
PEEK (2%6%1) AND 
PEEK <2+б+1)= PEEK ¢ 
2%56%4) AND PEEK 2+6 


8818:F0R G-8 TO 19:Aû= ` 
PEEK (2*65: IF (ñ= 
05+:8=8)+(й=9)+(А= 
17)+С4=18)+42>25)= 
B THEN 3838 


2%: СОТО “Ү” 
149494: POKE %61СсС,62й 
1838:CALL &61à8: IF 
PEEK V-1 LET N=N+2 
:M$CaDozM$ca»e"t,n? 


2Ғ»62»75,62 +4)+5= PEEK (2+6+5)) トド GOTO “Үү” 8020:ІҒ R4» PEEK (2%6%1 
298:POKE Z+L+R*5: CALL & =й THEN 830 1050:6070 1500 1720:B= INT ( PEEK 2/45 ) AND ñ<> PEEK &5F 
5Fgg 829: = PEEK (2+6+2): 12808:IF C>1 THEN 1258 )*45: POKE &6048:B BD NEXT 5iNM$(9)=" コ 


: CALL &6842: IF 

PEEK Vz1 LET М$‹0) 
-M$COD)*"*,4" ":NzN 
+5+Х: GOTO 1750 


3280:RADIAN :Ү$= INKEY$ : 
IF ASC Y$-65-L THEN | 
138 і | 
338:IF Y$-z"x*" THEN "6G" 


РОКЕ 2%б%2. PEEK (2% 
0+5): POKE 2%04%5»й: 
5070 858 

839i IF 0<9 AND PEEK 2+6 


22475": 6070 "Y" 
8838:6-215: NEXT б 
8949: PUKE &5F3C 12: 
CALL &SF38: CALL š 


1218:E-8:D- PEEK 2 
1228:B-8: FOR G-8 Т0 9 
STEP 3: IF PEEK 2 
+G)= PEEK (Z*6*2) 


区 突然 で す が , 皆さん は プロ グラ ム を 入れ る と き , どう いう BGM を か け て いる の で し ょ うか ?2 どん な 感じ の 曲 を か ける と 乗っ つて くる も ん 
ж», ぜひ 教え て くだ さい . PS. ШАСТ, PC-80001mkII (p.57) っ て の は ? Р5.2 ペン ネー ム に 意味 は あり ませ ん . (ハリ ケー ン き ん や ) 
*PC-80001mkII t iX, 10 年 後に 発売 きれ る 新 機種 で す . な ー ん て 冗談 あれ は PC-8001mkII の 間違い で し た . ゴメ ン ナ サイ / [P] 
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AND PEEK £2465- В-45 DP В-85 ОР B= 

PEEK (2%Х9 LET Ј=ӣ 98 ОР В2125 LET КІ 

: GOSUB 48180:6-22 sKI-2 

: NEXT G: GOTO 4йй | | 98818: RETURN 

34 68808:"R" CALL šSF3B8: IF 
480812:NEXT 0: RETURN PEEK "=1 CLS :5=8Е 
40020: С050В 40100 5жМ: CURSOR 24: 
40025:РОКЕ 2+Р“35), 170: PRINT "*th*225,h*»5": 

GÜSUB 280888 POKE %5ЕЙІ» ЖЕСТ: 
40030: W=W+]:K=2:P=Z:G=L: CALL &S5F88: GOTO 2 

G0SUB “А”: CALL &6 A14 

217:ñ= PEEK €CZ«L*1||58818:CLS : PRINT リュウ キョ 

$9 2": CALL &SF51: 
48835:Dz8:T-T*1: POKE Z+ 50508 6888 

L*11:175: IF 7-1 БЙЙ2Й: САШ &11EB8:CO-CO*1 

POKE 2%1%12»175 : IF CO4 THEN 58 
40040:KI=KI+4*(J+1): 5ЙЙ5Й:РРІНТ "TOTAL SCORE 

="; STR$ TA 
688068:IF Tñ>=I CURSOR 24 

:І-Та: INPUT “YOUR 

МАМЕ=° 0$ 

БЙӢТӢ: CALL %11ЕЙ: END 


6100: IF PEEK 『=1 RETURN 

LET Nz1.5:KI-48:M$ || 2884B:FÜ0R б-й TO L: IF 
(=" キ ー ト イ 7: GOTO PEEK (2%Х2%5<» 

385 PEEK (2%0) NEXT 6: 
CLS 1 PRINT "9354 RETURN 

L^ 208058:Pí122G:6-15: NEXT 
:S5z2-2bEZ«M:Cü-C0-CM- б: FOR G-8 TO L: 
43: GOTO 2118 IF PEEK (Х%22%10<> 

9:50Т0 8999 PEEK (2%0) NEXT G: 
:"A"R= RND 34-1: IF RETURN 
VAL PF ま KR)>3 THEN 1 || 28868:PC222G:6G-215: NEXT 
18808 б 
:IF J=0 AND RC>=TU 200705 IF ( РЕЕК 2+1 
AND R-RÜ THEN "A" PEEK &Z*PCB855 AND 
5P ま CR)= STR$ ú VAL РЕЕК €29,34» PREK 
P£CRO*15: РОКЕ P*6 (2%РС122 AND PEEK 
Еж5: RETURN で C+ に EE CAFES 
:"C" GRAD 233» RETURN 
20йй5:х%- ІМКЕҮЗ : IF Х$% || 280875:Sñ=Sñ+5 

z"" THEN 20095 28838: 5А=5й+‹ Ј=0):1=1-3: 
A= ASC x$-65: IF š FOR G= TO 2:A= 

<0 DR %>L THEN 244 РЕЕК (2%Р(099: 

a5 POKE 2%Р(02,170: 
:Р‹й)›=х: ВЕЕР 50: POKE 2+.+б+11,й: 
CALL &843B NENT б | 

IF PEEK 2+) =355 20898: CRLL. &SF38:K-1:6-L 
DR PEEK (2%Х2-4Й : IF L〈S РОКЕ &SF3 
DR PEEK <2+Х)=8Йй C15 

DR PEEK (2*x5-85 281080:IF J-8 POKE FU»178 
ÜR PEEK (2%Х2212й0 :FUZFU*1: CALL &5F 


aa 

280118: CALL $6217: RETURN 

50000: "0° GRAD :P(OD-L:6 
=} 

50ЙЙ5:ҒОЕ H-8 TO 1-1: IF 
PEEK (2%Р(й))- 
PEEK (〆+H) LET POG 
›=Н:б=б+1: IF 6-23 
(ЕТ H=15: NEXT H: 
GOTO 30020 

50010: МЕХТ H: RETURN 

38828:G0SUB "X": GOTO 20 
asa 

40000: "û" GRAD :6-8 

4Bgaai:xX- ASC INKEY$ -65: 
IF X48 DR X5L THEN 
40001 

40002: ВЕЕР 50: CALL &843 
В 

40005: 6=й: FÜR Н-й TH L: 
IF PEEK (2%Х)- 
PEEK < て Z+H) LET. BGG 
›=Н:б=б+1: IF 624 
(ЕТ H=15: NEXT Hi 
GOTO 40020 

48010:МЕХТ H: IF L=13 DR 


5 DR ñ=85 OR А=90 
OR 82125 LET D=1 
408058: IF D=1 LET KI=KI+8 
*úJ+1) 
4BB6B:CARLL &6217: RETURN 
48180: IF PEEK (2%Р(йуо-В 
0 LET DKB)=D(0)5+1 
40110:IF PEEK <2+Р‹ӣ))=0 
J28 RETURN D LET HX1)=D(1)+1 
40811:F0R GsL*11 TO 23 40128: RETURN 
STEP 3: IF PEEK “2 | 50000: "X"BzPCBOD:KI-KI-2: 
+б›= PEEK (2%6%1) IF B=B DR B=49 OR 


ш1)ЛК2 THE MAHJONG 2 ега!) X F g 


SF88:FFDB87021FDB020B ба || 6008: AFDB85825FDB3780 5108: рА24С758042Ғ0157 5208:С7577448840вВ0502 
5Ғ10:547861ҒҒ2Ғ0486й2 CT 5919: 了 869999293348324 5118:24073386252F8F 79 5219: 943424262F933793 
9F13:FFDB878227DB8287 6E || 5018: 082424С728082Ғ09 5118:602018623EB820852 6218: 0F858262DB86823F 
SF28:3478361FF2F8437080 76 6020:10680F828152372F 6120: 7360000203347360 6220: DB970220DB820B34 
5Ғ28: 99H け けけ けり は HH けり 9 90 5823:8013780802F83820834 6123:0802802343324Dn24 6228: T861FF2F8436823F 
OF 3: 929 じ 348492HFDB8S 27 || 5950: 7860800200342467 5138:24073813CET885CE 5250: DB870223DB820PB34 
5Ғ58:й25Ғ0В0208548524 23 68033:8738852F862D1E2F 6158: 25С7280874050А24 6238: T861FF2F84371881 
SF48:D824C73A087D45285 37 6040:0137736088024828B 6148:0733322F81376788 6240: 195FBE92RH99991F 
9F48:D85284852F8F2F1C BE 6048: 5483008324420 738 56143: 381567283811672D 6248: 3THH999898989898 
93F58:3778688836825FDB 21 || 6858:842F8137D0742DDÀ 5158: 338D675533896758 62580:1814141418282826 
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PC-1350 の キー 
入力 に つり 9 て 


今回 は 先月 号 で 予告 し た 通り , キー 入力 
に つい て 説明 し ます . キー 入力 の 方 法 に つ 
いて は ROM 内 ルー チン を 使う 方 法 と , すべ 
て を 自作 し て いく 方 法 が 考え られ ます . 

前 者 の 方 法 だ と プロ グラ ム が 短く な り , 
すべ て の キー が 1 回 の コー ル で 取り 込め る 
と いう 利点 が あり ます . し か し , 2 つ 以 上 
の キー が 同時 に 押さ れ た 場合 , 何 の キ ー が 
押さ れ た か わか ら ず , 移動 し な が ら 弾 を 撃 
つよ うな ここ で が で きま せん 

これ を 解決 し て くれ る の が 後者 の 方 法 で 
$. し か し , 後者 の 方 法 で は 入力 する キー 
の 数 が 多い ほど プロ グラ ム も 大 きく な り , 
RESPECT. そこ で , これ ら 
の 長所 や 短所 を よく 考え , 自作 の プロ グラ 
ム に 組み 込む こと が 大 切 で す (た と えば, 
前 者 は モニ タ , 逆 ア セン プラ な ど に , 後者 
は ゲー ム 等 に … と いう よう に ). 


ROM 内 ルー チン に キー 入力 を する ルー チ 


ン が 用 意 き され て いま す ( 前 号 参 照 )。 コー ル 
する アド レス は 0436H で す . コール す る た 


め の 前 準備 は 何 も な く , た だ コー ル す る だ 
け で す . 

еа Ср СЕТЕ 84, ыру Аы) 
れ ば Acc に キー の 通し 番号 ( 表 1) が 入り , 
キャ リー フラ グ が 1 に な り ま す . まだ キー 
入力 が な けれ ば Acc に FFH が 入り , キャ リ 
МТС b kaki ЕЯ, 2% 
以上 の キー が 押さ きれ て いる と , Ассі:40Н 
АФ; キャ リサ リーフ ラグ は 1 に な り よ ます. 

39, この ルー チン は リデル マダ イム な 
キー スキ ャ ン ・ ル ー チ ン な の で 。 キー 入力 
が ある まで 待 だ せ だ いと 
ЕР DRE RAO ENT LL よう 。 


: CAL O436H 
JRNCM WAIT 
RTN 


この 方 法 は 直接 ボー トカ か らら キー の 状態 を 
読み 込む 方 法 で す . PC-12 系 で は, IA ボー 
と IB ボ ポート を 読み 込み 列 の 指定 に 使っ て い 


て いる 人 が いる の で 


135013, ポー タプ ブル ・ 


き は 次 の よう な プ 


コン の 中 で も 一 番 デ ィ ス プレ イ ( 表 示 板 ) が 広い ので, と て も 気に入っ て いま す . 
コン コータ (時 じじ に で ポタ コン ジン ) だ つ だ の 7 が): 


ZZ): A グ ルー プ 
C ]:B グ ルー プ 1 


шиш 


4 zh d BRK к Ber 


наса i 
спе г 


7 8 


SÜEXEXCTUI Za D» — 
ыт P | - трее ат: : 1) [ал 21-1 
О sew t i ek вее 
Le MIn o epe а ры е е» 


өзе, [ENT] は [ENTER |, [SFT] 4 [SHIFT] TF. 
05315 852 (37K (878. 


52 IA ポー ト に よる キー 同時 入力 (A グ ルー プ ) 表 3 (7E00H) に よる キー 同時 入力 (B グ ルー プ ) 
— A レジ スタ に 入力 きれ る ビッ ト 
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RIS арау PC-1350t IXIBAC— Кан 
シリ アデル 入出 方 に 使わ れ て じ ま っ た だ た だ ため: 
読み 込む キー 列 の 指定 が で きま せん . そこ 
で この 機能 を メモ リ (RAM) 上 に 置き , ^ 
ー ド 的 に 指定 で きる よう に し で あり ます . 
IA ポー ト の 出力 で , 読み 込む キー 列 を 指定 

で きる キー を A グ ルー プ ジ , それ 以外 を B グ 
dp diu udo Lor 

クル ルーズ で まさ の グル ー グ で て: は: 
読み 込み だ た い キ ー の ある 横 の 列 の 左端 の 数 
値 を IA ポート に 出力 し , 次 に IA ポー ト か ら 
読み 込む こと に より , その と き 押 され て い 
る キー の ビッ ト が 1 に な る 点 か ら キ ー の 状 
態 を 知る こと が で きま す ( 表 2). 


され て いれ ば 24 (8 +16) zi, {п 
て いな けれ ば 0 が 6900H に 入り ます . 

次 は B グ ルー です .。 この グル ー プ "は , 
Х Е ) OTEOOH(- # š 22 X 41 v 2 fili ax 
み 込 む 列 を 決定 し ます ( 表 3). 注意 点 は , 
IA ボ ポート に は 必ず 00H が 出力 され て いな け 
れ ば な ら ず , 00 有 HH 以外 の 値 が 出力 きれ て い 
る と A グル ー プ の 入力 と みな る れ , ТЕООН 
の 値 は 無視 きれ る 点 で す . ув, その 他 に 
つい て は A グ ルー ジ と 同様 で す . 


ІРІ 2 上 か ら 4 列 目 の キ ー の 状態 を 読み 込む 
cLa], (5). [2], [.], [€]. [р], [e Jom 
LIP 5CH (AA ポ ボート の アド レス ) 
ANIM 00H (A ボ ポート に 00H を セ モット) 
OUTA (IA ポー ト へ 出力 する ) 
LIDP 7E00H (デー タ . ポ イン タ の セッ ト ) 


例 : 上 か ら 2 列 目 の キ ー の 状態 を 読み 込む 
(море. [Mm], [3], [U] 031) 
LIP 5CH (IA ポー ト の アド レン レス) 
LIA 02H (2 列 目 を 読む た め に 出力 する 値 ) 
EXAM (IA ポ ボート ヘ へ セット) 


LIA 08H (A レ ジ に 4 列 目 の 値 を セッ ト ) 
STD (4 列 目 の 値 を 7E00H に モット) 
INA (キー の 状態 を 読み 込む ) 
LIDP 6900H (デー タ を 落と す ア ドレ ス を セッ ト ) 
STD (読み 込ん だ デー タ を メモ リ に セット) 
RTN 


OUTA (IA ポー ト へ 出力 する ) 


INA (A ボ ー ト か ら A レ ジヘ へ 入力 ) 
LIDP 6900H 
STD 


RTN 
この プログ ラム を コー ル す る と 。 [MODE] 


が 押さ きれ て いれ ば 82, ӘГІРЕШ 


4 列 目 の キ ー の 状態 が 69 
れ ま す . 


以上 の 動作 で , 
оон: + > F 3 


p 私 は な ぜ か パン コン より ボケ コン の 方 に 興味 が あり ます . 私 は PC-8001mkII の USER で す が 、 友人 で ポケ ュ ン (PC-1245, РС-1261) を 持っ 
な ぜ か ポケ コン に 興味 を 持っ て し まっ だ の で す . そこ で 思い 切っ て お 年 で PC-1350 を 買っ だ の だ / PC-1350 は ポケ 


P.S.1 ポケ ュ ン USER の 皆さん 頑張 ろう PS.2 PC- 
P.S.3 私 は PiO が 発売 さき れる 日 に いつ も 買い ひい ます. な ぜ な ら 6PiO は 一 番 


PB-300/100TOR-1 


BASIC 


Slot- Machine 


スロ ッ ト ・ マ シン 


PB 用 の スロ ッ ト マ シン を 作っ た の で 発 
表し ます . 

画 プ ログ ラム ・ イ ン フ ォ メ ーション キー 操作 は , [a] — co, [5| キ ー で 
м, 斜め が 合う と, それ ぞ れ 5 倍 , 4 倍 , 
倍 に ma, 持ち 金 が 0 に な る と ゲー ム ・ オ 


| 短い ステ ッ プ の わり に は , な か な か 
Boon э-н 


рУ ЧО!) | I ik... : “| i I 
と テイ テマ アマ テイ ルイ チマ チバ チ イル イア アイ テル 


この ゲー ム は STOP が か か る の で , 1 回 
ご と に | EXE キー を 押し て くだ さい . 
PB ユー ザー の 皆さん , 私 は OR-1 を 使っ 


た ゲー ム も 作れ る の で す よ / 長 房 真 広 る 
A, ルッ パン 以来 で すね / 


か / 富士 東 高 バ ン ザ ー イ 7 


高見 君 , 見 て る 


2 


“ио сле ECT. ое 
か ら で , 掛け 金 入力 後 ド ラム が 回 り 出 し ま 


+. 画面 は @⑧ 〇 ( 図 ) に 分 か れ て いま す が 、。 
上 か ら 6⑳⑧⑥ 〇 の 順に ある と 考え て くだ る きい. 


®, [6@| キ ー で ⑤ を 止め ます . そし て , K, 


図 表示 画面 


表 1 行 番号 マッ プ 


初期 設定 , 画面 

ドラ ム 表 示 

キー 判断 

組み 合っ た か 判断 , 得点 プラ ス 
終期 画面 


キャ ラク タ 

ドラ ム の スト ッ プ 用 
キャ ラク タ 表 示 , 判断 用 
ルー プ 


mm s Slot ‘Machine BASIC リス F SEIESHEICHIIEQIUNOSUNUE ззмз„сСС— 


FOR zB TÜ ZMK || 118 IF i=} THEN 128 


Ші сама сы ы 
5 Piz'e'"tefzj€eiH 

so сайы 

INPUT "Kakekin" 

IF ХУ THEN 

28 

IF x48 THEM 29 

PRINT " d 

I": 
IF ізі THEN 2 


SEE | B9 


- с> 


KN Ye 


WINT (RRN#*9) 
NEXT H 

PRINT (ЭК ЙІНЕ 
My: USR 4:B$CM2; 

LSR ӘРЕ): 

IF K=i THEN ili 
FOR шей 10 2: 
HT RANEES) 
: NEXT A 


P DP d) M 
A 8?) ; ч K 2 NN 
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Т ДАШ N vw %: 
> ЁЎ: 3 м Уу 


黒磯 市 T SEX 


120 FOR Wah TÜ 2:50 
HINT (RRNIROD 
‘HEAT H 

138 PRINT ESR 25845 
SHER SAHT? 
05 i8: a$CUO: 
IF KEYz*" THEN 
38 
IF KEY="4": j=l 
IF КЕТ=*5":К=Ї 
IF KEY="6":L=l 
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先 に 売り 切れ て し まう の で すみ PiO 最 高々 それ で は , See you Again. (ЕТЕК) 


zY4XXb5 
ІР ü-B: IF ӘӘ 
ます も 1 
y=Y-X:PRINT :PR 
INT ЕМІР Те 
ñ THEN 298 

28 1=й:К=й:1=й:601 
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eri? 


баве 09 


IF ЧЕДИР i 


ЖАЙ Fou Ев 


QARA. 


PiU user o 
е 2 


長野 県 約 竹 入 雄 二 


16S 


Q 


PB-300/1 OO +OR-1 


BASIC 


АЛАС а 
HOUSE = 


ミラ クル ・ ハ ウス E 
9. ur. SES — ف‎ 4 


x` 


i S 


これ は 迷路 ゲー ム に アド ベン チャ ー の 要 図 1 画面 の 説明 
素 を チラ ッ と 入れ た ゲー ム で す . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 


eBX—BOX: カギ が あっ た と き は 手 に 入り , メモ は 内 容 を 表示 し ます . 

eKY- KEY : カギ が 横 方 向 ( 一 か 一 ) の 通路 に か か っ て いま す . カギ を 開け た ら そ の と き 通 り 抜 け な 
сс, な ぜ か 再び か か っ て し まい ます . 

ӨММ--МАМ: 人 が いて 一 度 こ の 部 屋 に 入っ た ら , 人 を どう に か する ま て 出 ら れ ま せん . 


Жі プロ グラ ム ・ マ ッ プ R2 変数 表 


だ いた い 良 く で き て いま す が , 割合 
ー 本 道 な の が 気 に な り ま す . も う 少 
し 複雑 に すれ ば , も っ と 良く な る と 


迷路 デー タ 
変数 T の シフ ト 
Man の 状態 ( 敵 ) 
コマ ンド (名 詞 ) 
行け る 方 向 


| に завес 
EHED 
100—200 | 箱 を 開け る 

| に o Meno 
Б тузе» 7 
ІСТИНИ 


各部 屋 に 置か れ だ 箱 の 中 の 物 を 取り な が 
о, タ ダイ アモ ンド の ある 部 屋 へ 行っ て くだ 
さい. 取っ だ ら ス コア を 表示 し て END で 
す が 。 手 に 入れ る だ め に は 暗 号 を 知ら な け 
れ ば な り ま せん (どこ か の 箱 に 入っ て いる ). 

із, 箱 の 中 に は 開け た と だ た ん に か みつ 


いて くる へ ビ や パワー の 減っ て し まう 煙 ダイ ア を 見 つけ る 
な ど が 入っ て いる こと も ある の で ご 注意 を . 


1~ 10 | 迷路 デー タ 読 み 込み 
キー 操作 は , [2] が |, [4] が ー, [6|2 15— 90 | パス ワー ド 読 み 込み 


>, [8] が 1 の 方 向 に 進み [5] を 押す と コ 表 を 示し ます . 詳し いこ と は 各自 で 解析 し ロロ 参考 文献 


そこ に ある 物 
迷路 の 状態 
カギ の 数 
エネ ルギー 
座標 

U の シフ ト 
Man の 状態 
パス ワー ド 


マン ド 待 ち に な る の で , МЕНЕ ХЕ | 名 詞 て くだ さい. 1) 種田 薫 : "迷路 ゲー ム ", プロ グラ ム 電 

| EXE | に 入力 し て くだ きい (メモ リ の 関係 卓 ゲ ー ム [1 |, ru 

C, ほぼ ば 形式 的 な も の に な っ て いま す )。. Ef 2 ) 堀内 一 美 “TINY DUNGEON”, 1/ 
e 


go O, "82 年 8 月 号 
ラム DAD 
o ⑯ 部 屋 ゲ ー タ は P9 に 入っ て いま す . 
5 ӨЗІНІ DEF M2 を 行なっ て くだ きる きい. 


球 1 に プロ グラ ム ・ マ ッ プ ,。 %2 ЖЖ 


| MIRACLE HOUSE IBASIC リ スト! 
168 ІР ге THEN 


15 
11И IF ІМЕРКІНГ `£ 
"rel 


T 


F R-INT (872% 
2-1 THEN 216 
265 IF 2(1)=1 THEN 


IF INT 1/4) 
432:PRINT ° 
Ü=1 
ТЕКЕ? 


Bi. 88 IF T=2;1F 2014 
8 50SUB #9 SPRINT "MNSZ 


X=á1Y=9;u=99;yv= | 


F Rz Ir Peli 


Br -8: 2-8 120 IF U-INT (BZ2)* PRINT ZER 278 ІР 
G0SUB Ф1:1Е Sf 2=13PRINT 2°: -Ү-1 
"же THEN 48 J=! S$-KEYtIF 38222] 288 IF В=6:1Е 0=1:7 
=0:0=0:Р=й: =й 120 IF SINT (8 ЧЕ Steeg THE] = 
432: PRINT 4: N 268 298 IF R=4;!F НЕП: 
2 50T9 216 =+] 
І R-VRL(SS):1F R= || 288 IF Re2:1F еі 
' 518058 #2: 6070 +1 


WzW-i:lF Ж TH 


118 


C 


に セミ グラ フィ ッ ク ( 文 字 や 記 人 だけ ) で ゲー ム を 作っ て いた で は な いで すか .。 そう いう ポケ コン を , 僕 は 本 来 の ポケ コン の 姿 だ と 思い ます . 
(PCUC の 会 員 に な っ て し まっ た 水上 秀樹 ) 


ーー 
(O) 7) p 2 月 号 に 載せ て も ら え て , と て も うれ し か っ た で す . と ころ で , 最近 PC-1246 と いう ポケ コン が 出 ま し だ た ね. グラ フィ ッ ク や マシ ン 語 が 使 
Ол QA 2 えな いよ うに な っ て いま す が 、 僕 は 本 来 ボ ケ コ ン は こん な も の だ と 思い ます . PC-1211 な ど は マシ ン 語 や グラ フィ ッ ク は 使え な いけ ど 。 立派 


p 


MIRACLE HOUSE BASIC リ スト 


Dz8505250586 
-#260300849 
r=B3B787B682 


EA $ 2 THEN 188 
3 8070 38 4505 ? PRINT PRINT 79 


ІН, is", “in ban 


р, a 


RETURN 


i 
に NE ӨСУІН 188 PRINT "Opened!" TInPUt th 1 j= 1888860982 
ARA ШЕ ӨжҒЕНС ¿There 16.2.” 8 Н=й307#60506 
cuz 188 at: 307 18841518 i IHPUT "PRSE-WÜR 2 i-5261818462 
T=INT (Hizi 38 PRINT "Enire." 085% iB j-4185878574 
-1%1й .-1:80T0 288 15 scINT (RANA 
2 RETURN 148 PRINT аео 2 i& 5070 28+B 
ц sl | PRINT "Ris 28 S$z"SECBME":50T 


OW Wo x ? 


Laüsht:^::END 


2 WLk-iTPRINT 
INPUT “COMMAND” 


T IM "Инт" T 
И IF S$=°KILL* IF] ig Кә; 
H= MAN": IF i= ttiG0T6 298 
i IF T22 THEN 8| | 178 PRINT "паке! *, 
3 "You dead... i 
8 Í! $= "UNLOCK": ND 
1 4$-^ DOOR": IF || 188 PRINT "Nothing, 
àj THEM $4 ; 
$= "ПРЕК"; IF 
2780) | 7 


pr э кек A pas 
5 “5:39 
' 


T "ñ 


Ў benedi ° 
| Чей 54-43 
3 RETURN 


PRINT "Lonaratu 
lations!'" 
PRINT "You taok 
the DIR." 
PRINT "Your sco 


re = i 


мз Yd ED ry be e 
u oum 


жек "ЕЗ бта gu ok 
— Си ЖП e 


22 S$="LOVE' 
30 2802) 65: RETURN 


2 PRINT "You are 
tired out." 
4 PEINT “You dead 


Я з 
8 ? 


|i Ң-0809й8й998 
2 E=B207T864305 
2 C=áBB371508504 


M$ 


ФКЕ! SATO 


21у Ms. 全体 画面 


へ ん て こ 村 に ある 迷路 に 迷い 込ん だ ら 最 
СФ, あそこ に は へ ビ が いる し, 一 回 迷 
い ぃ 込ん だ ら め っ だ に 出 ら れ な い . で も 一 つ 
だ け 出 る 方 法 が ある . それ は , 宝 や みん な 
取っ て カギ を 見 つけ る こと だ … と 聞い だ た い 
МЭУ ОБАА АН, そこ 公 大 ろ で し きえ まい 
ыж. 


2 —J 05393 


あな た は か える くん を 動か し , “ЕЖ 
м), 迷路 に 落ち て いる ダイ ア , 898], X 
" Jenn КОЕ, ジャ ング で きる 薬 , 
カギ を 取っ て くだ さい . ジャ ング する 楽 を x ü ROUND | 
取る と , スタ ミナ が 減ら ず に ジャ ンプ で き 
る よう に な り ま ます 。. 

も いう の は 六角 ミチ の さと や で 。 
を ころ どこ ろ に 水 だ まり が ある の で それ を Ж а 
取る と S が 増え ます . S が 0 に 近く な る と T Кей ne d uirum 
動き が に ぶ く な り ま す . に 

また この ゲー ム は ,。 4 方 向 ス クロ ー ル で 
T. 


- “2857. 
が 出る 


カー ソル で 4 方 


① ダ イア 500 点 ② 剣 300 点 ③ 大 判 400 点 向 に 動か し スペ 
④ 小 判 100 点 OK fl E6004 ⑥ 薬 100 点 ー ス て ゥ ャ ンプ 
する 


PB-300/100-*0R-! 


BASIC 


オイ チョ カプ の プロ グラ ム は , か な り 多 
くく ありま す が , この "カプ J-F” 8, 


今 ま で の も の と は 一 味 違い ます . 皆さん も , 


トラ ンプ で オイ チョ カプ ブ を し て 遊ん だ こと 
が ある で し ょ う . その カー ド 版 オイ チョ カ 
プ を PB で 楽し み ま し ょ う . 

較 プ ログ ラム ・ イ ン フ ォ メ ーション 


オイ チョ カプ と し て は , 表示 も わり 
と よく で き て いる と 思い ます . 


(Ta) 


入力 方 法 


初め に DEFM39 を 実行 し て くだ さい . 4 
TUE 詰め て 入力 し な いと 入ら な い 行 も あ 
り ま すか ら , 注意 し て くだ る 


遊び 方 


[ surr |O|I で ゲー ム ・ ス ター ト で す . 
"Kaketen?" と 表示 され た だ たら, 自分 の 持ち 
点 以 内 で 掛け 点 を 入力 し ます . する と, 4 
枚 の カー ド が 表示 る され ます . あな だ は 自分 
の 好き な カー ド を 選び , その カー ド の 場所 
を 左 か ら 数 え , その 数 の キー を 押し ます . 

だ と えば "$2 ФА 08 С”: 
表示 され だ た と し ます . そこ で , ФАСЯНО 
よ ょ うと 思っ だら 6, 表示 され た 場所 は 左 か ら 
2 番目 で すか ら |2| の キー を 押し ます . 

する と , その カー ド だ けが 表示 きれ , し 
ば らく し て も う 1 枚 の カー ド が 表示 きれ ま 
З. そし て , さら に も う 1 枚 ほし い 場 合 は 
|Y| を . いら な い 場 合 は [N| を 押し ます . 


だ た が 勝て ば 掛け だ 点 が 加算 きれ 。 負け る と 
その 分 だ け マ イナ ス さ きる され ま す . 


Жаз, あな た だ の 持ち 点 は 初め 100 点 で す . 


そし て 持ち 点 を 5,.000 点 以上 に 増やす と, 
PB が " | give ор,” の メッ セー ジ を 表 
示し て 降参 し ます . 果たし て あな ただ は 5, 
000 点 を 越え を られ る で し ょ うか .. 


特別 な ルー ル と し て , 親 び だ け の 特殊 役 に 
シッ ピン (AE4) と クッ ピン RED 


メイ ン ・ ル ー チ ン 
カー ド の 作成 
時 間 か せ ぎ 

カー ド の 数 位 判定 
カー ド の 選択 


ルー プ 

KEY 

ルー プ 

数 位 

子 の カー ド の 合計 
持ち 点 

親 の カー ド の 合計 
ルー プ 

ルー プ 

掛け 点 

ルー プ 

カー ド の 数 位 
選択 し た カー ド 
すべ て の カー ド 


だ け の 特殊 役 に は アラ シ (3 枚 と も 同位 の 
カー ド ) が あり ます . それ ら の 役 が 出 た 場 
合 。 シッ ピン まだ た クッ ピン を 出さ れる と 掛 
け 点 の 倍 の 点 を 取ら れ , 子 が アラ シ を 出し 
だ 場合 は , 掛け 点 の 倍 の 点 を 取る こと が で 
987; > ЖЛ УЛ УЕ УУ Ө 
が 同時 に 出 た と き は 子 の 勝 と し ます . 


プロ グラ ム の 説明 


この ブロ グラ ム は PO 一 P4 ま で の ペー ジ 
を 使用 し て いま す . PO が メイ ン で , RD 
は サブ ルー チン で す . 内 容 は 表 1 を 見 て く 
だ さい . 変数 表 と し て 表 2 も 示し て お きま 
し だ . Z$(0) ~ Z$ (89) まで の 40 の 変数 が す 
べ で て の カー ド で す . 10 の カード は で 表示 
5427, i, カー ド は AA 一 まで の 40 
枚 で す . 

カー ド の 選択 方 法 は , まず 40 枚 の カー ド 
を 作り , 乱数 を 使っ て 3 つの カー ド を 取り 
出し ます . それ ら の カー ド の 数 位 を 調べ る 
の は , 別 の ルー チン で 行なっ て いま す . 


最後 に 


カー ド て の カ グ を PB で / と 思い 。 ЖА 
САФ LRD, な か な か 難し いも の で すね . 
この ブロ グラ ム は 悪戦 苦闘 の 未 に 出来 上 が 
っ だ も の で す . ゲー ム 人 作り に は 慣れ て いな い 
OC, ムダ な 所 が ある か も し れ ま せん か ら , 
見 つけ た ら 直 し て も っ と 面白 《 く 改造 し て . 楽 
じん て みそ も 《 だ る きい 

それ で は 親 (PB) VS 子 ( あ な た だ ) の 対決 を 
ЕЖ. 


次 に 親 (PB) の カー ド が 表示 され, あな 


4й GOSUB 12: PRINT Kaketen*.kt&z] 1150008 #4:РРІМ || 18H KEY 
{аби - SPRINT Сн NT K I 118 IF C$="" THEN 
ges. T $2 ast 265 1805 š 68 IF КБ THEN 58 98 FOR J=B TÛ 3:PR ЯЯ 
ІН IF Кей THEN SB INT V$CD :МЕҲТ || 128 IF CCS S iF C$ 


20 j-8:9-8:G0SUB š 


28^: JEVRL CCS: 


58 PR RINT :INPUT 


PHBA, 茶 書 店 に PiO3 月 号 を 買い に いっ た . 中 を 見 て 一 言 、「 オ オッ 、 PC-8001mkII の ソフ ト が 2 つも / か っ , 感動 だ /」 と 心 の 中 
で 叫び 。 叶 速 買 っ て し まっ た (毎月 買っ て いる が ). し か し プロ グラ ム の 長き を 見 る と まる で この 世 の 地 獄 を 思わ せる (長い 方 が 私 は 好き だ 
9), PS.1 「 芝 怖 新 聞 … る ん 」 も PC-8001mkII の ユー ザー だ っ た ん で すか ? Р.5.2 山崎 さん, ЗА, 見 て ます か / P.S.3 PiO 
の CM が 聞き だ たい ッ ノ / (いつ か SR に 買い 替え る つも り の JOKE-BOY ) 


V 


8070 140 

sm 188 
j-1:PRINT :PR 

"E (i 

ORC) 

a GOSUB $2:805UE 

BAIPRINT v$;:P= 


C KEY 

IF C$="" THEN 1 

58 

VF C$="V° THEN 
288 

IF қсы 


^ 


& š 


195 2070 168 


PRINT ИН: 


|= + ZK 4 


Р! INT PRINT С 

R С "0ya"? 0S 
8 #2 

BÜSUB $4:PRINT 
PRINT ° 4; 


ШІП кез pr] pm x 
"ri 


rvi 


ж кзз 


- 
- 


ГҮ pm ni 


N 4j 

F に 

HEN 438 
Н=0+Р: IP d>185H 


IF 9210: Н=Н-19 


) GÜSUB 42:PRINT 


HBs 


F ЖРІРЕІНГІР 
RINT ° "ou win 
ЖЗ DTD 
478 
ІР НӘНЕРЕІҢГЕР 
RINT " ішілі 
"1:5z8-K:85010 4 
;ü 


A PRINT PRINT ^ 


2rawi"::G0TH 
479 
50508 42:PRINT 
SPRINT © Kuppi 
ni*:iibzG-ERx2: Щй 
Hi 45йЙ 
30518 #2 


IF $4 THEN 4B 
BÜSUB #2:PRINT 
SPRINT ` Game a 

yeri* 3 END 

IF 5<5888 THEN 
4й 

50506 &2:PRINT 
PRINT " І alye 
ЧР. ИЕН 


f= 825456189744 


НЕХТ В 
NEXT i 
RETURN 


PIG 


KABU BASIC!) АР 


:B FOR D=1 TO 18 
12 Қай 


Е 0=10: =й 

IF EzáxD- i; Ez: 
RETURN 
NEXT D 


FÜR Ј=й 103 


HiNT (RRNERIS) 
IF 2 THE 


INPUT ñ 


PRINT (8-20)%85 


%1508 
5070 18 


zi-18 Ы (2:8 ||P? 

IF 4 THEN in i ` 18 FOR LE TD 300: 
ТЕНГЕ ürashi || МЕХТ L:RETURM 
0SUB &3:H-H4E:6 P1 18-8HO: BOT 


зай { кы 9508 &2:PRINT ° ü 479 


@ 菊 池 由 紀 さ ん 好き マツ 


ナイ 52001 


スス ドー リー 

悪 ど い 手 で 政権 を 握っ た だ た サンダース は , 
自分 の 過去 が 知ら れ だ な いう ち に , か つて 
同じ スパ イ 業 を し て いた だ た マック を 暗殺 し よ 
ЛЕ? 

を そこで マッ ク は , 父 の 忘れ 形見 の ナイ ト 
2001 を 駆り , 悪 の 王者 サン ダー ス を 倒 を そう t HISCORE 
と 決 必 し た . | Й 198760 


2 — qq) 2 


ゆ ナ イト 2001 は エネ ルギー を 保 給 する だめ, 
一 時 マッ ク を 外 に 出し ます . そし て , マッ 
ク は 保 給 が 終わ る まで 敵 の 攻撃 を 防ぎ , {Ж 
給 を 終了 し た ナイ ト 2001 に 乗り 込み ます . 
@ ナ イト 2001 は 岩 に ぶつ か っ て も 爆発 し ま 
せん . 

9 兵士 は 1 発 , 敵 の 車 は マシ ン ガ ン 5 発 で 
破壊 で きま す . 

9 万 案 に 着く と マッ ク は ナイ ト 2001 か ら 降 
b, 白兵戦 と な っ て 砲 座 を 全部 破壊 する と 
サン ダー ス の 砲 座 が 出現 し ます . 

サン ダー ス の 砲 座 を 破壊 する と ゲー ム 終 
TC T. 


⑯ 岩 で 行き 止ま っ た ら , 白兵戦 び チ レポ ー | 地雷 は マッ ク だ ろう が 何だ ろう が 爆発 し 
ト し な た 次 の ナイ ト 2001 に 乗り 込み ます . ++. 


スタ ー ト か ら サ ンダ ー 
ス の 要 寒 まで の 距離 


169 


PB-300/200/ 100 


BASIC 


ピー ビー・ サ ンダ 


BSHUNDER 


«3n 


NS 


2хххя, 人 類 は な ぞ の エイ リア ン に 
з рп7-. は た し て 地球 防衛 軍 の 隊員 で あ 
る あな た は , 新型 戦闘 機 "サン ダー 号 " に 
乗り , エイ リア ン を 倒し 地球 を 守れ る か ? 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 


速い の は 良い の で す が , 全体 的 に 少 
し 簡単 すず る よう で す . (Ta) 


RUN す る ょ タイ トル が 表示 され ます . 
そし て | EXE | キー を 押す と TOP ス コア を 表 
示し て 右 か ら 左 へ 移動 し , 次 に 右 か ら 
ESTART «EXE? と 表示 し ます : そこ て ま 


た | EXE | キー を 押す と ゲー ム ・ ス ター ト で す . 


3 つの スコ ー グ 内 を エイ リア ン や 鏡 が う 
みろ うろ する の で , エイ リア ン の と きだ け 左 
か ら |4|[5|[e| キ ー を 使っ て 撃ち ます . HJ 
違っ て 鏡 を 撃つ と ビー ム が は ね 返っ て き て , 
サン ダ 一 号 は タダ メージ を 受け ます . 

タダ メー ジ を 受け る と 画面 が スト ッ プ する 
DT, [EXE | キー を 押し て 続け て くだ さい . 
3 度 ダ メー ジ を 受け る と "BOKA-N//" 
と 表示 が スク ロー ル L, їс: "GAME 
OVER" と 表示 後 "SCORE=” を 表示 し 
て 終わ り で す . 

な お , も う 一 度 す る と き は | EXE | キー を 
prim ir ERE 


⑱ こ に の ゲー ム が 速く て 難し い 人 に は , 120 
行 の で の 定数 を 大 きく する と 遅く な り ま す . 
また 遅い と 言う 方 は , 反対 に で の 定数 を 小 
きく する と 速く な り ま す が 。 エイ リア ン の 
反撃 の 率 も 速く な り ま す . 
120 IF С<5:6-5 

この 数 を 変え る . 


最高 0 ま で. 
※ 初心 者 数 は 9 らい が よい と 思い ます . 


= а, 


@ エ イリ アン と 鏡 の 発生 率 は 65 行 目 の 乱 数 
の 掛け 合わ せる 定数 を 小さ きく すれ ば , МО 


発生 率 が 上 が っ て 難し く な り ま す . だ だ し , 


хаа тсс S A<. 

キー の 選択 は 150 一 170 行 目 で す の で , fk 
いや おい тыр УЕ. З ан L k 3 
Ө+х++х>2>7Я4Я0Жл 7у13301{ТН C3. エラ 
ー が で な いよ うに , 好き な キャ ラク タダ に 変 
At Sk. 


{0:30 $= "ШО?О<<” 


КИШ ЧЕ Ым ORE FREN A 
ー ジ 回 復 を 作り た か っ だ の で す が , PB- 
100 し か 持っ て な い 人 も いる の で 少し で も 


多く の 人 に や っ て ほし い の で お さえ まし た . 


エイ リア ン と 鏡 用 

KEY 関数 

< 戦闘 機 用 

жа. 

ゲー ム ・ オ ー バ ー 用 カウ ンタ 
位置 比較 用 

表示 スピ ー ド 

ハイ ・ ス コア 

エイ リア ン の パス カウ ンタ 
位置 指定 用 乱数 

表示 スピ ー ド 用 カウ ンタ 
キャ ラク タ 指 定 用 乱数 
空き 

FOR~NEXT 用 カウ ンタ 


あき 


表 2 登場 キャ ラク タ 


戦闘 機 サ ンダ ー 号 

な ぞ の 物体 エイ リア ン 

反射 ミラ ー (間違っ て これ を 撃 つと ビ 
ー ム が は ね 返っ て 自分 に 当たり ます ) 


スコ ー プ (エイ リア ン の いる 位置 に よ 
っ て キー が 違い ます ) 

ダイ ヤ モ ン ド ・ ビ ー ム (サン ダー 号 ) 
パルス ・ ビ ー ム (エイ リア ン や 鏡 に よ 
っ て は ね 返っ て きた ビー ム ) 


PB-SHUNDER 


| ТОР=0 START 


START «EXE»? 


4 
*999999:! 


ОШФФФ9 9 < 1 
ОШЕОООООХ<4 


СППОООООХ< 10 
GAME-OVER 


mp ソノシート に つい て で す が , 普通 の 30cm の レコ ー ド の 上 に 置い て 再生 する と いう こと が 一 応 常識 と な っ て いま す . こう すれ ば た る み に よ る 
Кл хр оит. スク ラッ チ ・ ノ イズ に つい て は , あの 静電気 の か だ まり の よう な ソノ シー ト を , パチ リ と いう 斉一 つ な し 


exero 
Өл に 再生 する の は な か な か 在 難 の 技 ほ いえ る で し ょ う . こつ と し て は , ソノ シー ト を 本 か ら 切 り 離 す 前 に イオ ン 放 射 機 ( 少 々 高価 で す が ) で 中 和 


170 し て し まう の が 効果 的 だ と 思い ます . この アイ デア は ずっ と 続け て も らい だ いで す . 


"EN PB-SHUNDER BASIC リ スト H 


C» € Ut 


Ed - қа 
ex 
UQPpoe4 s. 


E». 
CE! cuu 
HIM аку 


eae 


- EJ 
LET 
but a A ұта 


010 218 
IF В$=*5°;:Ё=2:6 
ME 21@ 
gje" БН 
m 218 
NEAT H 


CF» vns CO 
сл jr Cs 


‚ле < 
и 


h 
e 


аз | 
"TES GL 
зх XQ LES 


MISSILE 1 MISSILE 2 


(21 フ レッ ト で 一 音 半 チョ ー キ ング を や っ て 一 弦 を 切っ て し まっ た 武市 賢治 ) 


e WING MAN 
РіО "85 年 2 月 号 の 不協和音 さん の キャ ラ を ドッ ト 化 し て み ま し た . 


MISSILE 3 


IF Еі =: IF 
1=19 THEN 298 

5070 58 

IF jtist THEN 8 


PRINT CSR нуч" 
NEXT Ñ 
IF Lei THEN 298 
PRINT CSR jen 


ре 


5070 68 
FÜR N=j+! TÛ | 
PRINT CSR N 

а NEXT N 


E-E-1 
IF гей THEN 370 


23-8 ID CS Ej 
PRINT CSR 7; "x" 
I: 

8010 80 

PRINT 

PRINT ° EOKR--- 
NU 


3 PR 


PUEL. SHIP 


a sas 


INT “GANE OYE 


a Т 
ЖҮНГЕ 
PRINT , 


: SCURE- 
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А 682. 
ЕМУ -200 の исег 23. ie os bes 
と な た か 8oB を 中 心 と し に ENN S 


サ - ク (LE 2«23 54852 7 
名 も APRILE NIEA Ea pea 


т816 
| эана аел, 
-33-6 


Ж Ж Ее (825 
9 Post Soit X pp REC ж ›Ё: 


まし ょ ちら た ら | U-DILo HEX 
ARE RIZA FXG ob POKER Uz 


> 
ҮҮ, 


Ж ШЕШШУ 


部 


AB. 531.024 6) 2 €. テリ ー IFA ‹ (ロス アン ジェ ルス 在住 ) 
ご ざい は ( た 、 が か お に も 5 いい た 。 u “л . nex | o d i 
C32. LR Р に 学 で 日 本 語 を 勉強 中 の Terr) さ ん .。 いつ の 日 か 日 本 で 仕事 
。 SOLVA) ОЗА ESIR A 2 い ` E! DUf-UOc6o)BAROPUS5A.WF— 3-—-T49-*—9-— 
| せり 参 00( て いただき た いこ し が お め ) [ФӘ у] / CA] の 仕事 を し て で いる の で , お 客 さ ん の 旅行 の スケ ジュ ー ル 作り 
Далалы м 57227 | 2 чк: 使う そう で す が . ` コ ンピュータ は 日 本 語 
Фаза СО. 。 > Шы \ を 勉強 する より 難し い /” と は 彼女 の 弁 . 
お ね が いし 3 すず \ 


dM) 3-4 3569 idet фуд 


7R 
fe 


A 
岩 
手 
県 
め 
が 
ね 
e 
ま 


К FAM // 
、 1% ІШ Ж 3-17 
4 富山 市 AARE 


ER 


Y マ 大和 市 秀峰 


Arm 7-2 v (ZL | PE … 
QM Азат nae 
е な こと が で きる PEA H-A- 
0 pw RE f ota tz. 
7 1242. ни 7-16-17 


E AR PET | "m омыр 2457 7-27 rj 2 7? は < 5 28 
eM Waua А | LBER xref 
р | zi Ka Ае Ns 4 

4 Lr 


3 V 577% ted. 6 4-Ет yy E i: zs 


; ` w tZ „ %, А4 を 1 Š a - こい ここ ここ ここ ご - 
BEY MEO 3 : > у; ETE ғ. 
92: 7223 a — A hg $T 部 か 読み 和む 2121 3 
چ‎ BERE s 
cm LS Lope 


b >з 


EIT 


日 本 語 タ イブ プ ライタ 
NIEVE. コロ ンー に 


較 NEW ビ ピコ ワー ド は 横書き は も ちろ ん , fü 
書き も 簡単 に で きる 日 本 語 タ イプ ライ タ で 
+. 

CORSO 

半角 ・ 倍 角 機 能 ゅ Mtr š ЖЕНЕ» A 4 サイ 
R 1 枚 分 ( 約 1,300 娘 字 ) Ох е) ЖВНЕ У 


フト タッ チ の タイ プラ イタ 型 キ ー 

(m) \98.000 

(問い 合わ せ 先 》 ブラ ザー 販売 (株 ) 
情報 機器 事業 部 

460 名 古屋 市 中 区 大 須 3-46-15 

1% (052) 263-5855 


漢字 プリ ンタ 


РТ-ӘСОО?РТ-ЭЭОО 


ШІРТ-5500/РТ-3500(4-:2%7Ь%5<07> 
フィ ッ ク 印 字 が 可能 で , 1 イン チ あ た り の 
《 仕 様 》 | 

PT -5500 


セン トロ 準拠 /RS -232C 
| オー トロ ー デ ィング 機構 


ドッ ト 数 が 360 ド ッ ト と 高 精細 の 印字 機能 
を 備え た , 24 ピ ン ワ イヤ ドッ ト 漢 字 プ リン 


PT-3500 


24X24 ド ッ ト 
18X13 ド ッ ト 


1/360 イ ンチ 


| オー トシ ー ト フィ イーダ (オプション ) 


トラ クタ 
| ボトム フィ ー ド 


(オプ ショ ン ) 
(オプ ショ ン ) 
(オプ ショ ン ) 


高 性 能 デ ー タ ・ レ コー ダ 


BIDR- 2 2 は デジ タル 信号 波形 処理 回 路 を 採 
用 し た , 高 性 能 デ ー タ ・ レ コー ダ で す . 

《 規 格 》 

> トラ ッ ク 方 式 : 2 トラ ッ ク 1 チ ャ ン ネ ル 
p 録音 方 式 : 飽和 録音 上 ゆ 消去 方 式 : D C iH 
去 ゅ テー フス ピー ド : 4.8cm/ 秒 (ノー マル ), 
9.5cm/ 秒 (ハイ ・ ス ピー ド ) PFX b gm] 
・ 約 110 秒 (C-60) P 巻 戻 し 時 間 : 約 110 秒 
(C-60) P 対応 転送 速度 : CMT モ ー ド 600- 


電子 潮汐 計 


2,400bps 出力 レベ ル : CMT-OUT4Vpp 
CMT-SUBOUT20mVppp 外形 : 166 (ili) 
x128 (高き ) x146( 奥 行 )mm 重量 : 1.2kg 
p dE : 電灯 線 , AC100V 消費 電力 : З 

W 

(mit) \12.800 

(問い 合わ せ 先 》 アイ ワ ( 株 ) 

&»110 東京 都 台東 区 上 野 1-11-9 

1% (03) 835-1201 (代表 ) 


SBVO10/SBVO ジ O 


画 フ ィ ッ シン グマ スタ ー (SBV010. SBV0 
20) (à, 8 ビット の CPU と 潮 の 千 満 に 関す 
る デー タ を を 内蔵 し た 電子 潮汐 計 で す . 

《 仕 様 》 
ケース: プラス チック 外形 寸法 79.1 
x62.0x17.8mm (ЕХ x 2) WERT 


(Syntax Error) 


度 : 月 差 キ 20 秒 以内 (常温 ) 
《 価 格 》 
SBV010 (東日本 版 ) \30.000 
SBV020 (西日本 版 ) \30.000 
《 問 い 合 わせ 先 》 (株 ) 服 部 セイ コー 
&»104 東京 都 中 央 区 京橋 2-6-21 


эсс. 

(4m 1& ) 

PT-5500 ж 298,000 
PT-3500 ж 198, 000 

《 問 い 合わ せ 先 》 (株 ) 東 芝 
&»105 東京 都 港 区 芝浦 1-1-1 
® (03) 457-2100 (代表 ) 


A (03) 563-2111 (代表 ) 
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СЕ-1ЗОТ 


ШСЕ-130ТІІЫІ ОСУ) >Л,4(2/9-7і4 | RS-232C と イン ター フェ イス を 持つ パン コン (P 
ス を 持つ ボケ コン (PC-1350, PC-2500) 5, C-5000, MZ-5500/6500 等 ) を ケー ブル で 継 
(fr 


き , デー タ の 送受 信 を 可能 に する RS-232C 
レベ ルコ ン バ ー タ で す . 

(m) \17.800 

《 問 い 合 わせ 先 》 

< 大 阪 > シャ ー プ (株 ) 経営 企画 室 広 報 
B545 大 阪 市 阿倍 野 区 長池 町 22-22 

f? (06)621-1221 (大 代表 ) 

< 東京 > シャ ー プ (株 ) 東京 支社 業務 部 広報 
9162 東京 都 新宿 区 市 谷 八 幡 町 8 

A (03) 260-1161( 大 代表 ) 


名 | CT-130T 
| EIA. RS-232C (JIS C-6361) 準拠 


( 
15 ピ ンコ ネ ク タ (オス 端子 ) 
25 ピ ンコ ネ ク タ (DB-25( メ ス 上 端子 )) 
アダ プ タ 接 続 端子 


内 部 充電 式 電池 (充電 : 100V 50/60Hz 
AC ア ダ プ タ  EA-11E 使 用 ) 


計算 機 と の 接続 
パソ コン と の 接続 


4.8V (DC) 0.45W 


フロ ッ ピ ー デ ィ ス ク 


Storage Master シ リー ズ 


lMiStorage Master シ リー ズ は , 潤滑 剤 を 密度 48TPI テ 片面 また は 両面 ・ 単 密 / 倍 密 記 
用 いる 新 方 式 (ルプ リケーション) を 採用 ERD 最大 容量 1.6M バ イト 

し た , フロ ッッ ピー ディス ク で す . 《 価 格 》 

《 仕 様 》 5 イン チ Y9000D)2:6€1,350(2HD) 

5 イン チ 8 イン チ ¥1 ,200(1S) か ら \1,650(2D) 
p48/96TTPI 了 片面 また だ は 両面 記録 最大 洗 《 問 い 合わ せ 先 》 日 本 シー ディ ー シ ( 株 ) 

量 1 M バ イト 85170 東京 都 豊島 区 東池袋 3-1-i 

8 イン チ サン シャ イン 60 容 (03) 982-6211 


AUTO DIALLER 


呼び 出し ぐん 


MFO HE L Alk, 約 100 件 の 電話 番号 登 と 一 時 停止 上 9 大 文字 表示 の LCD デ スプ レイ 
$$, 番号 呼び 出し 機能 に , さら に 電卓 機能 b» 自動 電源 オフ 機能 


や 時 計 機 能 を 装備 し た オー ト ・ ダ イア リー 
で す . 

《 主 な 機能 〉 

p % 2 = ) U 8 XFO #,Bij L ЗНО Ж 
an» 2° АЛТ 222 о Ка К 


(mg) \11.800 

(問い 合わ せ 先 》 東京 電子 科学 機材 (株 ) 

49101 東京 都 千代 田 区 外 神田 2-4-4 
電波 ビル 3F 

1% (03) 251-3271 (代表 ) 


( 不 点 灯 )/ 午 後 (PM)・ 月 ・ 日 (オー トカ レン 
ンダ ー) 馬主 要 回 路 素 子 : 高 性 能 音 叉 型 水 
昌 振 動 子 . ワ ンチ ッ プ C/MOS-LSI b fi: Hi 
電池 : No. 361 電池 寿命 : 約 2 年 
《 問 い 合 わせ 先 》: カシ オ 計 算 機 (株 ) 
49160 東京 都 新宿 区 西新 宿 2-6-1 
新宿 住友 ビル 
1% (03) 347-4811 (代表 ) 


超 薄 型 ・ 軽 量 デ ジタル ウオ ッ チ 


圏 カ シオ ベラ FS-10 シ リー ズ は ,。 デジ タ 
ルウ ォ ッ チ の 構造 か ら 駆 動 部 プ ブロッ ク (= 
ジュ ー ル ) の 概念 を 排除 し た 。 モジ ュー ル 
Z "ビル トイ ン 実 装 " 技術 に より 実現 し た , 
薄 さ 3.9mm, 重 さ 12g の 起 薄型 ・ 軽 量 デ ジ タ 
《 価 格 ・ そ の 他 )〉 


Po.» 

《 主 な 仕様 》 

小品 発振 周波 数 : 32,768Hz 常温 携帯 精 
度 : 月 差 約 15 秒 以内 表示 方 式 : FE 型 デ 
ジタル 表示 表示 内 容 : 時 ・ 分 ・ 秒 ・ 午 前 


ぁ 来 年 受験 の 皆さん , 頑張 っ て くだ さい / ^, 私 は PiO 1 、 2, 3 月 号 の PiOPIO を まとめ 読み し て いま す . 最近 FP が 盛り 返し て る と 思い 
ませ ん か ? “FEP100% 活 用 " と いう 本 が 出る わ , PiO の プロ グラ ム は 面白 いわ , ユー ニー バー サル ・ ボ ー ド が 売り 出 き れる わ 。 これ か ら が 楽し 
み で す . で も 3 月 号 に 載っ て いな か っ た の が 不安 材料 で す . P.S. みん な PiO に 投稿 し ょ う . 

( 頭 の 中 で SUB CPU と MAIN CPU が 走り 回 っ て る FP 命 ) 


市 販 ゲ ー ム の 秘技 を 大 公開 ! 


ホバー アタ ッ ク X1/C ン D { 


「 も う 動 き が メチ ャ リア ル /」, EROR 
間 が 快感 」,「 初 め は 難し いけ ど 馴 れる と 最 
高 に 面白 い 」, 「 早 〈 く 移植 し て .,/」 な ど な ど 
大 好評 の ホバー アタ ッ ク で す . 

この ホバー アタ ッ ク は , ホバー スー ツ に 

身 を 固め た ど で か い バ ズー カ を 持っ た ホ バ 
一 戦士 と 。 小さ い バ ズー カ を 備え た ホバー 
戦士 を 運ぶ ホバー 戦闘 艦 と で , 敵陣 を メチ 


52529250502505050505050505050505050505050505050505050505050505050505 


ジョ イス ティ ッ ク 


同時 に 使う H 巳 こ テ ン ・ キ ー 


「 軸 ち ま く り ゲ ー ム な ら ま か せ て お け 」 と 
O33. wU-HMACCOUISS て 


b, その 前 に 操作 方 法 だ け は 覚え て お こう . 


まず 次 の 写真 を 見 て て だ きる い . ジャ ンプ な 
どの 行動 系 は ダイ ナミ ッ ク な 操作 が で きる 
JST, バズ ー カ 発射 な どの 正確 る を 要求 す 
る 攻撃 系 は テン ・ キ ー で と し っ か り 2 系 統 
に 分 か れ て いま す . そし て それ ぞ れ の 合体 
と 離脱 は トリ ガー ボタ ン で 行ない ます . 

どう ? 一 見 面倒 な キー 操作 も 実に 整然 
と し で いる の が わか る だ ろう 。 だ か ら , すぐ 
МИЕКТЕРЗО” ҰК %; 

キー 操作 の 説明 画面 


KEV FUNCTION 
$ t р —— з 
Du. E 
зард +++ mo 


HOVER ^] 1 ғ 


PUSH SPACE BAR 


誰 に で も で きる 年 直 ジャ ンプ 


早速 垂直 ジャ ン フ ' に トラ イ し て みよ 2 う . 
JS を 上 に 倒す と ホバー 戦士 は ほん の 少し ジ 
ャ ンプ し ます 。 C Ре оа ЕТЕ 
か ら 君 が ジャ ング する よう に 一 度 ひ ざ を 曲 
げ て か ら (JS を 下 に ) 一 気 に ジ ャ ング し て 
15^ 

こう する と 。 E o LF EA 5 Ј 
5427; 2124. 最も 基本 的 な が テク ニッ ク で す . 

基本 的 な ジャ ンプ 


ャ クチ ャ に 破壊 する と いう まこ と に 勇 し い 
ゲー ム な ん だ . し か も , テク ニッ ク を 駆使 
し な けれ ば クリ ア で き な い 面 が 全部 で 20 と 
豊富 . 絶対 , いつ まで た っ て も 飽き な い ゲ 
ー ム だ よ 。. 

それ で は , 奥 ふ か ー い ホバー アタ ッ ク の テ 
クニ ッ ク を この 場 を 借り て 公開 し て し まお 
37 


に 


AES = LJ 
NTMI 
ロケ ッ ト じ ゃ ある まい し , 真っ すぐ で 跳べ で 
て も 僅 く も な ん と も あり ませ ん .。 そこ で 今 

度 は 方 向 転換 ジャ ンプ に トラ イ / 
ジャ ンプ は 基本 的 に 前 方 , 垂直 , 後方 に 
で きま す . だ か ら こ れ ら を 組み 合わ せれ ば 
方 向 転換 な ど わ け あ り ま せん . で は この テ 
TES AK 2 Sk S Sta a 
落と し 容 か ら 脱 出す る 場合 、 バ ズー カ 攻 撃 
し て か ら す ぐ 後 ろ に 人 逃げ る 場合 な ど で す . 

これ は 実戦 的 な テク ニッ ク で す . 
落と し 穴 か ら 脱 出 


バズ ー カ 攻撃 & 退 脚 


決ま れ ば スコ ゴイ ! 
高級 ジャ ンプ 

ホバー スー ツ を 着れ ば 誰 で も ジャ ンプ の 
天才 に な れる と 言っ て も 過言 で は あり ませ 
ん . 本 当 に あき れる ほど いろ いろ な ジャ ン 
プ "・ テ クニ ッ ク が ある の で す . 

一 番 初め に , ひざ を 曲げ て か ら 一 気 に ジ 
ャ ング する より 高く 跳べ る と 説明 し まし だ 
i, 実は も っ と も っ と 高く 跳べ る 方 法 が あ 
る の で す 。 

まず , 先ほど と 同じ 要領 で ひざ を 曲げ て 


ме ARE ЖО SOME OOOOPORG 
E MIRE ; Жо 


か ら ジ ャ ンプ "し ます . そし て , 画面 に 表示 
され て いる ホバー メー タ を 見 て , エネ ル ギ 
ー が 0 に な り そ う に な っ だ ら ジ ョ イス ティ 
ッ ク を 素早 く 戻 し ます . そう する と , エネ 
ルギー が 回 復 し て くる の で , ホバー 戦士 が 
落下 し 始め る 前 に まだ JS を 上 に 倒し ます . 

これ を うま くく 繰り返す と , 思い も よら だ な 
ぃ 大 ジャ ング "を する こと が で きま す . X 
JS を タイ ミン グ よ く 下 ーッ 上 トー 下 と ポン グ の 
ょ うに 操作 する わけ で す . 

次 は 斜面 を 登る テク ニッ ク . AX 
を 登 ろ うと し た の で は 足場 が な い の で , Ж 
ルズ ル と 滑り 落ち て し まい ます . 

こう いう と き に は , F TRU СФ 
に ジャ ーッ ズ し まま 、 を し て COLS 
倒し た JS は その まま で , ホバー エネ ルギー 
が な く な る まで 放っ て お きよ ます. こう する 
と ホバー 戦士 は 斜面 を 少し 登っ だ と ころ で 
+8 b まま 。 

ここ で JS を 戻 き な いで グル ッ と 回 す よ 2 う 
に 斜面 側 (横向 き ) に し ます . する と , Я 
面 に へ ば りつ い だ た まま , ホバー エネ ルギー 
が 回 復 す る の で す . 後 は これ を 繰り 返し て 
どん どん 登っ て いけ ば いい だ け . 
斜面 登り 


大 ジャ ンプ 


まだ まだ ある 店 級 テ クニ ッ ツ 


お っ と ,。 まだ まだ 教え て あげ だ いこ と が 
山 ほ ど あ る の に スペ ー ス が な く な っ て し ま 
いま し ただ. この 他 に も 紹介 し だ い テ クニ ッ 
ク や キャ ラク タ が いっ ぱい ある の に ……. 

と に か く 。 馴れ だ け で プレ イ す る アデ クシ 
ョ ン ・ ゲ ー ム の 中 で , 本 当 に テク ニッ ク を 
磨い て 勝負 する 本 格 的 ゲー ム , それ が ホッ ババ 
ー ア タッ ク な ん だ. 

ホバー 戦闘 艦 も この よう に 運ぶ こと が 可能 


NEWS ./ 
ホバー アタ ッ ク PC-8801/mkII 版 完成 間近 . ノ 
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カシ オ 計 算 機 (株 ) か ら 新 型 ポ ケッ トコ 
ン ビ ュー タ "FX-780P" が 発売 され まし 
た . この FX-780P に は 今 ま で の ポケ ッ ト 
コン ピュ ー タ に は な か っ た 特徴 と し て , 仮 


想 コ ンピュータ の COMP-X を シミ ュ レ ー 
ト す る CAP-X ア セン プ ブラ (準拠 ) 機 能 が 搭 


載 さ れ て お り , 情報 処理 技術 者 試験 の 受験 
を 志す 人 達 の 間 で 話題 を 巻き 起こ し そう で す . 


= j= ji 


折り だ た だ た み 式 に な っ て いま す . また 外観 は 
パード ケー ス の よう に な っ て お おり, 少し で 
らい の 荒い 扱い に も 充分 員 え を られ そう で す . 
サイ ズ も , 閉じ た と き が 142X71※X18mm と 
Jé <, 持ち 運び に も 便利 で しょう . 

まだ , キー ボー ド は 関数 キー と アル ファ 
ペッ ト ・ キ ー が 分 離し て な り 。 アル ファ ベ 
ッ ト ・ キ ー は ソフ ト タ ッ チ 式 に な っ て いま 
す . 全体 的 に は 今 ま で の キー ボー ド と 比べ , 
だ いぶ 使い や すく な っ て いま す が , た だ 


[S| SHIFT) キ ー が 真ん中 に あり , + CBE 
b に | BRK | キー が ある だ た だめ, ちょ っ と 間 
違え や すい か も し れ ま せん . で きれ は ば [S| 
キー は 端 の 方 に 置い て ほし か っ だ で すね . 

を し て 表示 部 で す が , 24 桁 で 文字 も 大 き 
〈 割 り と 見 や すく な っ て いま す . 


ін 


ride p= dari 


а) 


2i 


|= fs 


„Шоо i 


rige 


Hi um 


た よう に CAP-X ア セン プラ 機能 で し ょ う . 


PiO の 読者 の 中 に は , この 言葉 に あま りな 
じみ の な い 人 も いる で し ょ う が , ni 
年 10 月 に 行なわ れる 情報 処理 技術 者 試験 に 


RI 相 異 点 


最大 256 記 憶 プ ロッ ク 
な し 
12 種 


実行 後 制御 カウ ンタ SC に 実効 アド レス を 


入れ て 停止 


同一 プロ グラ ム 内 て 定義 され て いな い ラ ベ 
ル 名 の と き は , アド レス 定数 の 決定 を 別 の 
シス テム ライ ブラ リ に まかせ , 実行 に 先 だ っ 


FX-780P 


最大 2 記憶 プロ ッ ク 

READ, WRITE 

14 種 

実行 後 シ ミュ レー タ の メニ ュー 画面 に 戻る 


区 切り 記号 と し て : (コロ ン ) を 使用 する 
ADCON 疑 似 命令 で 参照 され る ラベ ル 名 も , 


ソー ス ・ プ ログ ラム の どこ か に 定義 され て 
いる 必要 が ある 


て 別 の プロ グラ ム の START 疑 似 命令 の ラ 


ベル と 結合 させ る 
あり 


表 2 


ダン プ の メニ ュー 画面 に 移る . 


| 内 а 
オプ ジェ クト の 実行 画面 に 移る . 


メイ ン ・ モ ー ド に 戻る . 


キー 入力 音 ( プ ザー) を ON/OFF す る . 
(ON の と き は “BUZZER" シ ン ボ ル が 点灯 し て いま す ) 


トレ ー ス ON (“TRACE ON" シ ン ボ ル 点 灯 ) 


プリ ンタ 出力 モー ド (“PRT ON" シン ボル 点灯 ) 


レコ ー ド 番号 と し て の 表示 の み 


コマ ンド 


出さ る れる 課目 で す (1 種 は 必修 , 2 種 は 選 
択 と な っ て いま す )。 この COMP-X の シミ 
ュ レ ー タ は 以前 に 1/O で PC-8001 版 な ど が 
載り まし た が, 実際 に この 機能 を 搭載 し た 
機種 は , 今回 の FXX-7 


E^ MEL fs 


ます 。 ジー ス い ジョ グラ スム の НС 
ッ ー ス は [AODE|[9| ほ に し て メモ イン ・ モ 
ー ド に し , ラベ ル : ニモ ニッ ク : オペ ラン 
ド も いっ な だ 形式 で , ヌ モ の デー タ と し て 入 
力 し ます . この ":" を 区 切り に 使う 方 法 
は 実際 の CAP-X と 異な る 点 で あり , この 
他 に も いく つか の 相 異 点 ( 表 1) が , この 
FX-780P の アモ ンプ ブラ に ほ あ り ま す . 

次 に オプ ジェ クト を 作成 する アモ ンプ ブラ 
で す が こ れ は 実に 簡単 で . た だ [Asmbl| キ 
ー を 押す だ け で す .。 そし て アモ ンプ ブル が 終 
わる と コマ ンド 待ち に な り , 表 2 に 示す よ 
うな 各 コ マン ド が 使え る よう に な り ま す . 


表 3 PB-100 シ リー ズ と の 相 異 点 
(マニ ュ ア ル よ り 引 用 ) 


人 @ 追 加 命 令 
PASS (プロ グラ ム 保 護 ) 
ВЕЕР ( プ ザ ー 音 ) 
READ (DATA 文 より デー タ を 読み 込む ) 
DATA (デー タ 定 義 ) 
RESTORE (読み 込む デー タ の 指定 ) 


ON 一 GOTO (GOTO 文 の 間接 指定 ) 
ON ~GOSUB (GOSUB 文 の 間接 指定 ) 
REM (注釈 文 ) 

ФЕЛІМЕ 
DEG (60 進 数 一 10 進 数 変換 ) 
DMS$ (10 進 数 一 60 進 数 変換 ) 
STR$ (数 値 を 数 字 に 変換 ) 


表 4 変更 命令 お よび 変更 関数 


p この 前 , 友達 に 手相 の こと が わか る 人 が いた の で 見 て も ら っ た ん で す . 前 か ら 手 に 運命 線 ( 疑 の 線 ) 6 し きも の が な い の て 心配 だ っ だ た の で す 
が , その 友達 が 言う に は 「 や っ ぱり 早死 に だ 」 と 言う ん で す . 17 才 頃 で 病死 だ そう で す が …。 ちく し ょ う / 俺 は 15 才 だ ぞ / あと 2 年 で 死 
ん で た まる か . も っ と P6 で 遊ぶ ん だ ー い / PS. 占い な ん か ど わ いっ 嫌い / 


(し いた け ヨ ー グ ルト ) 
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FX-780P に は , を その他 の 機能 と し て 数 
式 記憶 機能 ほし データ ・ バ ンク 機能 が あり ます . 

数 式 記 憶 機 能 dX. シャー の PC- 
1260 プ 1261 に ある ビジ ネス ・ シ ミュ レー シ 
ョ ン ( 式 プロ グラ ム ) 機 能 ほ と ほぼ 同一 の も の 
C, だ と えば 球 の 体積 を 求め る 

V —4A/3* z*R13 
と いう 式 を 登録 し て むけ ば , あと は [CALL| 
キー を 押し て 半径 R の 値 を 入力 すれ ば , 7 
ぐに 答 が 求め られ る と いっ だ も の で す . 

た だ し , この 機能 を 使う 場合 に は 1 つ だ 
け 注 意 が 必要 で す . それ は 軸 smbl キ ー を 
押し て アモ ンプ ブラ 機能 を 使用 す る と , 今 ま 
で 記憶 し て い だ 式 が クリ ア る れ て し まう と 
いう こと で す . つま り , この 数 式 記憶 機能 
と アセ ング ブラ 機能 は , 同時 に 使う こと が で 
る な いも いう こと て YS 

iz, デー タ ・ バ ンク 機能 は , 同社 が 先 
に 出し だ た PB-110/410 が 搭載 し て いる 機能 
と 同じ も の で , デー タ の サー チ な ど が 簡単 
に 行 な な を ます. し か し , この 機能 も 先 の 数 
式 記憶 機能 同様 に . CAP-X7 2 77220 
ue “ デ ロ グ ラム が ささ の デー ダ ュ イシ ング 
内 に 格納 さる れる だ め , 同時 に 使用 する こと 
が で きま せん 。 

これ ら 2 つ の 機能 が CAP- 双 アモ ンプ ブラ 
機能 と 同時 に 使用 で きれ ば , まだ た 一 風 変 わ 
っ た だ 使い 方 が 考え られ だ の で は な いか と 思 
7 少し 残念 な 気 が し ます . 
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FX-780P と PB-100 シ リー ズ と の 互換 性 
に つい を は 8 6 АСЫН ЗЕ 
基本 的 に は PB シリ ー ズ の プロ グラ ム は を 
の まえ ま 動 まま すし 。、 PB シリ ー ヌ の チー ズブ 
も 読め る よう に な っ て いま す . 

だ だ し , 計算 ジャ ング (GOTO A*10 
な ど ) は その まま で は 動か な いい ので, ОМ 


ェ GOTO の 型式 に 変え な けれ ば な り ま v^. 


езе. res 
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3 rig ras ^N. EOM l< Aa йл үйл үйл 町 

ке ru STK 

クタ ・ プ リン タ (FP-12S)、。 カセ ッ ト イ ン 

妨 フェ イス (FEA-5)。 デ リン タケ ー プ ブル 
(SB- 2 ) が 用 意 き れ て いま す . 


表 9 共通 部 


24 桁 ドッ トマ トリ スク 液晶 
C-MOS VLSI 
仮数 部 10 桁 , 指数 部 2 桁 


メイ ン 電 池 リチウム 電池 (CR-2032) 2 個 使用 


メモ リ ・ バ ッ ク ア ッ プ 用 リチウム 電池 (CR-1220) 1 個 使用 


0.04W 

本 体 の み 約 170 時 間 
約 8 分 

0°C~40°C 


開い て 幅 142X 奥 行 142X 厚 さ 9mm, 閉じ て 幅 142X 奥 行 71X 厚 さ 18mm, 157 g (電池 込み ) 


шш) 
FX-780P Ұ22,800 


ЕР-125. *16,500 
FA-5 Y4,500 
SB=2 ¥3,500 


表 5 演算 部 


Ан, 指数 , カッ コ を 含む 四則 計算 (加減 ・ 乗 除 の 優先 順位 判別 機能 付き ) 

三角 ・ 逆 三角 関数 (角度 単位 は 度 ・ ラ ジア ン ・ グ ラッ ド ), 対数 ・ 指 数 関数 階 乗 , 開 
зр, 2%, ЗФ, 立方 根 , べき 乗 , 10 進 60 進 , 10 進 っ 16 進 , 双 曲 ・ 逆 双曲線 関数 , ЖЕ 
標 変換 , 順列 ・ 組 み 合わ せ , 乱数 , т, 整数 化 , 整数 部 除去 , 絶対 値 , 符号 化 
仮数 部 10 桁 目 土 1 (原則 と し て ) 

標準 偏差 デー タ 数 , 総和 , 2 乗 和 , 標準 偏差 (2 種類 ) 

X の 標準 偏差 ( 2 種類 ), Y の 標準 偏差 (2 種類 ), 定数 項 , 回 帰 係数 , 相関 係数 。 X の 推 
定 値 。 Y の 推定 値 

浮動 方 式 (工学 浮動 小数 , 指定 小数 , 有効 桁 数 表示 切換 可 ) 

-1x10—99— +9.999999999 х 1099, 3154 0*0, 内 部 演算 は 仮数 部 12 桁 を 使用 


表 6 数 式 記憶 機能 


最大 62 文 字 (62 バ イト ) 
演算 子 , 関数 命令 , 変数 名 等 

[IN | キー に より 表示 内 容 を 記憶 . キー に より 記憶 内 容 を 表示 
キー に より 実行 開始 . 変数 名 の 質問 機能 あり . 

デー タ 入 力 時 お よび 演算 結果 表示 時 に メッ セー ジ 表 示 可 


表 7 デー タ ・ バ ンク 機能 


1 行 62 文 字 で メモ リ (最大 3552 バ イト ) 以内 . 

メモ イン ・ モ ー ド に より ダイ レク ト 入 力 . 

ダイ レク ト サ ー チ ,。 イニ シャ ル サ ー チ , シー ケン シャ ル サ ー チ . 
訂正 , 追加 , 削除 可 . 


表 8 BASIC プ ログ ラム 機能 


RUN, LIST, LIST ALL, NEW, NEW ALL, PASS, SAVE, SAVE ALL, LOA 
D, LOAD ALL, VERIFY, NEW Z, LIST £, SAVE £, LOAD # 

INPUT, PRINT, GOTO, ON GOTO, FOR- TO- STEP, NEXT, IF — THEN, GO 
SUB, ON GOSUB, RETURN, READ, DATA, RESTORE, STOP, END, MOD 
E. SET, CLEAR, DEFM, REM, ВЕЕР, LET, PUT, GET, READ %, WRITE 
#, RESTORE #, STAT, STAT LIST, STAT CLEAR 

KEY$, DMS$, LEN, MID$, STR$, VAL, HEX$ 

CSR 

&H 

4K バ イト (シス テム エリ ア 544 バ イト 含む ) 

最大 10 組 (P0 一 P9) 

標準 26 個 一 最大 470 個 , お よび 専用 文字 変数 ($) 

2 種類 ( 高 ・ 低 音 ) 

メイ ン 電 池 交 換 時 の メモ リ ・ バ ッ ク ア ッ プ あり . 
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パソ コン DJ 大 成功 / 


Q TYPE LESSON N88, BAT- 
TLE: FIELD S1, CASINO 


を 見 て みる と キズ が 多少 付い て いま し た . 
だ けど 少し で らい の キズ は だ いじ ょ うぶ 


な の で し ょ うか ? SLOT 
ソノ シー ト に は 1200BPS で プログ g ス テレ オ : 日立 Lo-D イー グル M 
ラム が 入っ て いる けど , 4800BPS は 無 5 
理 で し ょ うか ね , БИЈЕ. これ か らち も デッキ : 日 立 .Lo-D D-78s 
S1 の プロ グラ ム に 期 等 し て いま す . アッ ー ク タビ ロー タダ : 日立 TRO 
=m TP 2400-- I/O5 月 号 エ ンジ ン ル ー ム の 流 
セー プ ブ の 仕方 を 教え て — 
尼崎 北 消印 の 無名 子 マイ コン : 日立 レ ベル 3 т--?2П- 
て トル “フィー ルド Si カジ ノ ス ロ 64KRAM 二 IG カ ー ド 
ッ ト カジ ノ ス ロ ッ ト は その まま ロー ド で き 
と も に ロー ド 成 功 し か し 相当 苦労 まし た S1 の 方 は 中 間 コ ー ド , ロー 
Li ド ・ ア ドレ ス の だ め に ロー ド し て 機械 
の ステ レオ ・ コ ユ コンポ 語 の 方 は チェ ッ ク サ ム を 見 た な だけ で す . 
⑳ と に か く パ ソン コン か ら カ モッ ト へ の セ タイ プレ ッ ス ン N88 は 。 レベ ル 3 で 
ー プ の 仕方 を 書い て ほし い . モー ブ の PC-80 ょ PC-88 の BASIC テ ー プ を 
仕方 が わか ら ない. レン ベル 3 の テー プ ヘ コン バー ト す る プ " 
ソノ シー ト に つい て は 賛成 で すか ら ログ ラム を 作っ た の で ロー ド す る こと 
絶対 続け て くだ きい (S1 ソ フト を 載せ が で きま し た . 


供給 し て ほし い の は РС-8001+ 


その まま ロー に で きた | ジル に クー 
竹本 正道 | フウ ー ド 
РС-6ООО:/!)-д 

スク ロー ル ・ ス ネー ノ ] 


絹 集 部 で は 『 パ ソン コン DJ」 の ロー ド に つい て , みな さ | グラ イコ は Ü に 合わ せ ル 再 生 す る 機能 が あっ た の で , それ を 


使い まし だ. P.S ソノ シー ト を 切り 


ん に ご 協力 を お 願い し て いま す が , お か げ さ まで 多く の 人 | 米村 弥 離す と き , 多少 な り と も 形 が ゆがみ ま 
か ら の 報告 を いた だ き , と て も 感謝 し て お り ま す . ag E キー お fH S ETE 
š E Ada た の の です が か ⑯ ス テレ オ : ア イワ ・ マ イペ ー ス (コッ Өйт. また 今 の まま で は 音量 が 小さ 
すべ て の 報告 を 紹介 し た か っ た の で す が , 紙面 の 都合 で べ ) すぎ ます . その 辺 を 御 一 考 願 いま す . 
ご く 一 部 の 人 し か e せん . WW ボリューム は 3 くら いで , ZAR- Y |= 
lx еледі я лан I т た 人 は 下記 の 成功 例 を 参考 ダク ショ ン OFF , グ ライ コ は みん な 0 今度 は ソー ル ・ フロ ジラ 
de s ñ 2 に 合わ せ て ダビ ング し た ら 、 1 発 で LSI 元 山 義昭 
b て Cy ТР O.K で し た 
今後 ツ ソノシート で 供給 し て ほし い プ W ミ ラク ル ・ ワ ー ル ド , スク ロー ル ・ ス 
: pm ネー ク II 
LEVEL3MARK5 na unm @ プ レイ ヤー : テク ニク ス 51-26 


周 違 し い を 入力 し 直し 72... アン プ : テク ニク ス 50-7600 


デッキ : テク ニク ス M-7 orRS- 


山本 健史 630U 
ゆ SCROLL SNAKEII デー タ ・ レ ニー タダ  : МЕС PC-6082 
] 発 で ご ロー に で きま し だ た .| よう. で 中 か ら レ ヨー ド ・ ス プレ ー @ プ レイ ヤー : Lo-D HT-462 @ 上 記 プ レイ ヤー, 707. デッキ, デ 
°| o は 使わ な い 方 が よい で し ょ 5. テア ンプ: Lo-D HCC-50 кез істе УШЫ" S ARUM L ta 
水面 の 靖 PiO の な か げ で S1 の ソフ ト が で っ デッキ : Lo-D D-M70 2 台 の デッキ と デー タ ・ レ ュ コー タ で 同 
GBATTLE FIELD S1, CASINO と 増え まし だ た ね. これ か ら も ソノ シー ⑥@ 針 は か な り 痛 ん で いて 心配 し て いま し 時 録音 の 結果 , ミラ クル ・ ワ ー ル ド は 
SLOT ト を 続け て くだ きい с, や は り 雑 音 が ひど く 。 い くら テ 1 回 目 ミ ス , 2 回 目録 音 レ ベル アッ プ 
@MB-S1 TRQ-1500 4~5 万 の = = ==. ー グ に 入れ て も ロー ド で きま せん で し LTOK, スク ロー ル ・ ス ネー ク II は 
M git Ри чү ы ae чаони 保存 さ は サラ ン ラッ プ た . そこ で : ステ レオ の 端子 か ら 直 接 1 回 目 一 発 O.K. 
Же С な ご で 包む と よし パソ コン に 接続 し て や る と, BASIC 録音 レベ ルー 3 dB, デー タ ・ レ コ 
@ 青 生 の 方 法 は 、 プ レイ ヤー か ら ス ピー 板橋 実 は 一 発 で 成功 . マシ ン 語 も 入り まし だ た —— 音量 6. 
カー の コー ド を 抜い て か わり に タダ ビン », ビッ ト 落 ち が あ っ だ た だ み だ た だ いな の で 4 月 号 も , PC-6001 用 プロ グラ ム 
グ ・ コ ユー ド を つなぎ , 他 端 を TRQ- ФВАТТІЕ FIELD SL CASINO モニ タ で 間 蛋 い を 直し て モ セーブ し ま し を 楽し み に し て いま す . E モ ニタ の よ 
1500 の 入力 端子 に つなぎ ます . そし SLOT, 3 D-DUAL BALL HM. それ か ら 、 この アン プ に は モノ ラ うな ツー ル ・ プ ログ ラム も 載せ て / 
て プレ イヤ ー の ボリ ュー ム を 最大 に し @ プ レイ ヤー : デン オン DP-40F 
T, TRQ-1500 で 音量 調整 し ます . デッキ : ビ クタ ー KD-A5 | 
カセ モッ ト か らら 再生 する と き は , 1—2, アン グ : オ ン キ ョ ー А-805 3 月 号 FM- ノ 
録音 する と き は 5 一 6 で 成功 し まし た . Өс, CASINO SLOT が な か な か 
今度 は スク ロー ル ・ ゲ ー ム を 付け て ロー ド で きま せん で し た だ . その 結果 苦 B-2 
くれ ませ ん か ? それ か ら 。 や は り ソ ノ 心 の 末 に 新しい 方 法 を 考え まし た . D жне а 
シー ト に カバ ー を 付け て くれ る と 助 か し 汚れ だ し P レ コー ド を 下 に 置い て 安 
り ま す . жам, 上 に ソノ シー ト を 置い て まっ 小さ い 間 で も ロー ド で きき | は レ ュ ー ド の キズ な ど は 少な く , や は 
udin =) すぐ に 整え る . あと 大 きい 音 で 録音 し =! り レ ベル の 調整 に ある よう で す . 私 の 
すべ に テー бы て みる の も いい と 思い ます . š š デッキ で は , 一 4 —— 2 dB くら いで 
BRER 保存 は す サランラップ で や わら か く 包 谷崎 佳 久 充分 ロー ド で きま し た . まだ Dolby 
み 、 あ まり 動か る な い 重 い 本 (辞典 な WSuper Ball Bomb Bomb, 3D- で す が タ イプ 'B の も の は ON に し た 方 
で BATTLE FIELD 51, CASINO と ど ) に は さ み 横 に し て お く と いい で す . Dual Ball が 好 結 果 が で まし た . 針 圧 は 普通 で 
SLOT P.S. 友人 の FM- 7 の で も で きま テク ニク ス ・ ス ペー ス 7 R( プ レイ ヤ O.K. で す . PEAK 式 の デッキ で 1I/O 
cmd EE M ШАР = 4SL-D383, FU FU 5716808 エラ ー が 出 て どう し よう も な い 人 は レ 
カー ッ ジ : ei = デッキ : К5-М45), 富士 通 純正 レコ ベル を 下げ Eod 小 
テン プ : 自 作 (OP ア ンプ LM833 合 プレ イヤ 7581 eod i ce test: cred Hr qum 
用 ) レコ ー ダ に 録音 し た @ ザ ず ・ ユ コク ピッ ト , F-154 —7" か えて みる でき で す . ラジ カセ で 録音 
デッキ : アカ イ GX-7 万 が し し い . 最近 の デッキ の レベ ペル ・ メ ー タ ー は する に は レベ ル ( レ ュー ド の ) が 小 き 
テー プ ・ レ コー タダ ': ナシ ョ ナル RQ 加藤 健一 FL 表示 管 の も の が 主流 で す . また いで し ょ う が 。 ソノ シー ト の 性 質 上 こ 
8200 PEAK 表 示 が その 大 部 分 で す . 以前 れ 以 上 の レベ ル で は 刻む こ と は 無理 で 
デッキ の 録音 レベ ル は 最大 に し て 十 1 @ Battle Field 51, Casino Slot の 針 式 に 比べ て FIL 管 表示 の も の は 各 し ょ う 。 レ コー ド ( ソ ノシ ー ト ) に 間 
dB で あっ た (も ちろ ん ドル ビーOFF). @ デ ー タ ・ レ コー ダ : TRQ-1500 社 と も 誤差 は な いよ う で す . また 指針 題 が な けれ ば 純正 レコ ュー タダ ' な ら ま ず ロ 
デレ イヤ ー は フル オォ ー ト だ が , 大 丈夫 プレ イヤ ー: コロ ム ビ ア С-К1 式 の も の は PEAK 式 より 大 きめ に 針 -ETAST 
әр, ロー ドミ ス は な く 。 2907 Ө! 度目 で ロー ド OK. で し た やはり が ふれ る よう で す . そこ で 3 dB を ー の 
ログ ラム と も 一 発 で 成功 し た . プレ イヤ ー か ら 専用 レコ ー ダ へ 録音 し だ PEAK 式 の デッキ で 録音 する と レ ュ レコー レベ ル 
と に か く ソ ノシ ー ト は ほこ りや 熱 に 方 が 良い よう で すね. ー ダ は レア ツン ・ オー ッ を キー に な り ジ OO エ を いっ ぱい に すれ ば 
弱い か ら , PiO を 買っ て きた ら な に それ と ソノ シー ト に カバ ー な ん か を ラー に な る よう で す (事実 私 も そう な 寺 元 利明 
は と も あれ テー プ に 録音 し て し まい ま 付け て ほし いで すね . 売れ 残っ な PiO り ま し た だ た). そこ で 1I/O エ ラー の 原因 93 D-Dual BALL 


全国 の PC-1245 ユ ー ザ ー の 皆さん へ . 最近 PC-1246 と いう も の が 出 ま し た ね . な ん と , PC-1245 の 3.8 倍 も の 演算 スピ ー ド を 持っ て いる の 
だ そう で す . が 、 し か し 皆さん 、 "PC-1245 の 時 代 は 終わ っ た " な ん て 思っ ちゃ いけ ませ ん . 実は PC-1246 と は C-MOS 4 ビッ ト を 使用 し て い 

、 る の で す . それ に PC-1245 よ り メ モリ が 小さ いそ う で す . まだ PC-1245 は 現役 で バリ バリ や っ て いけ る の で す . PS ボケ コン ・ マ シン 語 o 
AM, つい に 買い まし た 、 (あん ば ぱん) 


@ プ レー ヤー : オン キョ ー CP-60A 


ナン ゲー オン キョ ーー АЖАР 
255 

デー タ ・ レ ュー ダ ' : サン ョ ヨー MR 
3 3 DR 


@ と に か く データ ・ レ コー タダ を 使い ま し 
55. いろ いろ いわ れ て いる よう で す 
pî, デー タ ・ レ コー タダ" で FIX-ON に 
し て レベ ル い っ ぱい に すれ ば いい L Ë 
いま す . ちな み に 一 4 一 一 2 dB に な 
っ て いま し た . 音質 も めちゃ くち ゃ で 
や り ま し た (高音 +20%, 低音 一 
109%). ま た , レ ュー タダ ' は 高い デッキ よ 
b 普通 の デー タ ・ レ コー タダ ' の 方 が いい 
と 思い ます . それ と 印 丘 に つい て で す 
D, 3 ぐ で らい に する と 絶対 入る み だ い 
ТІНЕ, まき た ちい WE を ファ ルー 
が 平たく な っ て いれ ば 充分 で す 。 それ 
に 針 圧 を 上 げ る と 薄い ソノ シー ト が 
危険 に な る と 思い ます . 

カセ ッ ト 化 きれ だ も の は 誌上 公開 る 

れ た の で も 工学 社 に 無理 が ヵ かかる と 思 

いま す が これ か ら PiO に 載る コン 

パイ ラ 型 式 の プロ グラ ム で 長い も の を 
希望 し ます (K や EXAS な ど ). 


配線 だ け で .IK. ! 


WREE 
ФСНАКО NYAN 


プレ イヤ ー : ナシ ョ ナル SF-125 
レコ ー ダ "一 : サン ヨー ОТ-440 
な ん と アデ ンプ な し で 配線 だ け で つない 
だ どら う まく いっ た 供給 し て ほし い プ 
ログ ラム は , 3 月 号 の PALISH で す . 
P8 mkIISR が で て 。 どん どん い 
い ゲ ー ム が で る か も し れ な いけ れ ど 
PC-8001mk П を 忘れ な いで ほし い . 


所 は イン ター フエ ェ エイ А 
が な ちょ っ と 違う で 


RIFTER 


ФСНАКО NYAN 
@ プ レイ ヤー : ビク ター の 古い ステ レオ 
デッキ : テク ニク ス M13 
ソノ シー ト か ら カ セッ ト ・ テ ー プ "に 録 
音 し て か ら ロ ー ド し て み ま し だ が 失敗 
ソノ シー ト か ら 直 接 読 み 込 ませ だ 6 ら 5 
回 目 で ロー ド で きま し た :. 
SR は カセ ッ ト ・ イ ンタ ダー フェイ ス 
が 今 ま で と 違う よう で 今 ま で の プロ 
グラ ム が 読め ゆな か っ だ り し て 少々 と ま 
どっ て いま す 。. 
今後 。 N。 Nso Nso SR 
BASIC モ ー ド で 動く プロ グラ ム の 供 
給 を お 願い し ます . 


CK だ つっ だ 


ФСНАКО NYAN 

@ プ レイ ヤー : パパ イオニア PL380 
МР: ママ ハゲ だ けど よく て わからない 
デー タ ・ レ コー タダ ": NEC PC-DR 
311 

ӨШСЕ) --.%7.5 264%, 音質 
が 良く な る よう に ツマ ミ を 調節 し た . 
ロー ド す る と き 何 度 や っ て も エラ ー が 
で た の で 思い きっ て デッキ の ボリ ュー 
ム を 下げ だ た ら 入 っ た . 


1], p50 ロボ ポー で 録音 し た 方 
が よし いい の で は "で 


岡田 X 
QCHAKO NYAN 
@ プ レイ ヤー : テク ニク ス SL-DL 1 
デッキ : アイ ワ FF60 
デー タ ・ レ コー タダ: ソニー TCM- 
3000D 


市 川 尚樹 


КЕЙ PC-8001 mkII 


= Chako Nyan 


⑧@ 録 音 す る の は デッキ の 方 が よかっ た だ たよ 


デッキ の 彰 量 を 下げ た ら 


ソノ シー に の 穴 が ちょ っ 
と 小さき さめ や ве 


ӨЗ D-DUAL BALL 
W プ レイヤー: バイオ ニア PL-505 


アン グ : サン スイ  AU-D607X 
デッキ : ラ マイ オニ ア CT-1000 


@ ン ノシ ー ト の 上 真ん中 の 穴 か 小さき く , F 


ら な は ず の ソノ シー ト が ボコ ボコ に な 
っ て し まい , レコ ー ド の 針 が 上 下 し て 
いた だ . 穴 を も う 少 し 大 きめ に し た 方 が 
いい と 思う . 

コリ を よく 取り , 穴 を 大 きく し て 
針 を きれ い に し , ヘッ ド の クリ ー ニ ン 
グ と 消 磁 を 行なっ た 上 で 録音 し た . 初 
め は 90 分 テー を 使っ た 65 エラー が 
出 た の で 30 分 テー を 使用 レベ ル 
は VU メー ター で +2 dB, 

な お , デッキ で 録音 し て デー タ ・ レ 
コー タダ ' で ロー ド す る 人 は , それ ぞ れ の 
テー プ ・ ス ピー ド が 狂っ て いる と きも 
ある の で , どん な に きれ い に 録 音 し て 
も ロー ドド できない こと も ある .。 ifj, 
ドル ビー は ON に し た 方 が 成功 系 が 高 
Y 


7. ドル ビー は OFF に し まし た だ 
ヵ B や C を 入れ て 録音 し て も る し つ 
か えな い は ず で す . プレ イヤ ー ガ が カ 納品 
質 な た め に スク ラッ チ ・ ノ イズ が 上 目 立 
tš LU. これ は ホコ リ や 静電気 で は 
あり ませ ん 。 本 の 間 に る さらけ出し て は 
さん で ある た だ ため に , 立ち 読み を し だ た 人 
が ソノ シー ト の 表面 を 触っ て し まい 指 
の 脂 が 着い て こび ぴり つい だ も の が 目 に 
みえ な い キ ズ の 役目 を は た し だ の で す . 
言い た いこ と は わか る と 思い ます . 55 
ソコ ン よ り も オー ディ イオ ВЕТ 2 
僕 が 最高 の クリ ー ナ ー を 使用 し て 確か 
め た の で すか ら 確 か な こと で す . ここ 
か ら が 大 事 な の で す が , PC は 600 ボ 
ー で 他 の ボー レー ト よ り も 発信 音 の 周 
波数 帯域 が 低 じ た ゆめ スク ラッ チ ・ ノ イ 
ズ の 影響 を た きく 受け る らし い の で す . 
だ か ら ク ロー ム ・ テ ー プ "を 使っ て も 進 
展 は まっ だ く な か っ だ の で す . X1 な 
ど で は メタ ル ・ テ ー ブ プ を 使う と か な り 
確実 に 成功 する そう で す . 

ボー レー ト は 低い 方 が たいがい は エエ 
ラー が 出 に くい の で す が ,。 ソノ シー ト 
の 場合 は ソノ シー ト か ら 出 る ノイ ズ の 
周波 数 特性 ほし か ら み つい て 複雑 な 状況 
に な っ て きま す . ソノ シー ト の ノイ ズ 
は 以外 に 低い 音 が 多い と いう こと で す . 
解決 策 ほ と し て は 1200 ボ ー に する 短 か 
い ブ ログ ラム を 毎回 載せ て お いて ソノ 
シー ト に は 1200 ボ ー で で レコー ディン 
мітиессктт OP UNS 
BASIC は 不可 )・ 


本 回 以上 試し こみ た が 


аж Её 


@ i H A РЕ»”— 2, CHAKO 


NYAN 


@ デ ー タ ・ レ コー タダ : MR-33DR 


プレ イヤ ー : 20 年 近く 前 の も の で 不 
HJ 

ラジ カセ : 東芝 BOMBEAT727 
テー の  : マク セル UDI 30 分 


ププ レイヤー から ラジ カモ の 外部 入力 に 


つない で 使用 し まし た . 宇宙 船着 陸 人 ググ 
ー ム は 一 発 で ロー ド で きま し た だが 

CHAKO NYAN は 20 回 以上 試し ま 
し た が だ めで し だ た な か な か РіО: 
# 672 C Ns-BASICO£— 237 
/Ó$—bhkUCAOoCULOCCORBNKUÉSLU 
гр, 3 月 号 か ら は 2 枚 も 付い て くる の 
で 多く の 機種 に 対応 で きる で し ょ う . 

それ か ら 供 給 し て ほし い プ ログ ラム は 


7 月 号 の PLANET TAIZER で す . 


CHAKO NYAN は も っ と 他 の 装置 
で 試し て みょう と 思い ます . 


ラジ オ РЕ 


* 


Ф275 27° 2° 
プレ イヤ ー : ソニ ー PS-Q7 


FM ラジ オォ : ポケ ッ ト ラ ジオ 


遊び の つも り で FM トラ ンス ミッ ター 


付き の PS-Q 7 ЖРМ, MZ 
-700 の 端正 に ポケ ッ ト ・ ラ ジオ を 付 
け て ロー ド も だら 一 発 て K VELE 
bv 
ソノ シー ト で 供給 し て ほし い ブ ログ 
ラム は 。 MZ シ リー ズ も の . 


レベ ル 調 整 で ロ .K.! 


AREE 


⑨ そ グラ ン デ ィング ダグ 
き プ レイ ヤー : ソニ ー PS-X30A 


デッキ : ビ クタ クー た ザイ 7 


まず 何 か プ ログラム が セー ブ さ れ て い 


る テー プ を 用 意 し 。 ソノ シー ト を 録音 
する デッキ で 再生 し て みて その レベ ル 
を 覚え て な むき ます . そし て この レベ ル 
で ソノ シー ト を 録音 し ます . 


岸田 尚 


@The Jail 

@⑳ プ レイヤー : パイ オニ ア の モジ ュ ラ ー 
ステ レオ 

デッキ : ソ ニーW キ ッ ド CFS-W 
600(W デ ッ キ ) 

デー タ ・ レ コー タダ ' : МЕС DR320 
まず プレ イヤ ー か ら テ ー プ に 録音 し ま 


X1 シ リー ズ 


ASIC の 方 が ロー ド 
са, 


Qv7 —774SOS, マリ ン ・ ダ イ バ 


北沢 和 選 , 


@ テ クニ クス SA-K7 R 十 パイオニア 


SK-650 


⑨9 千 きん の 中 に は 45 回 転 で ロー ド で き 


だ た 人 が 何人 か いた だ よう で すか カ ЖО 
合 は 45 回 転 で は まっ だ く 読 ん えん で くれ 
ませ ん で し た 。 マリ ン ・ ダ イ バ ー の 方 
は マシ ン 語 の 方 は 読ん で くれ まし た が 
BASIC の 詞 は どー し て も ロー ド が 終 
わる 前 に CHECKSUM ERROR が 
ETL ОСЗ. これ は いけ な いと 
Муз, ソノシート を ゴシゴシ と そ 一 じ し 
まし た . し か し その と き 力 が 入り すぎ て 
ソノ シー ト が 折れ て し まっ だ の で す . 
これ は 完全 に だ め だ と 思っ だ の で す ヵ 5 
案外 大 丈夫 びっ だ たよ う で す . 折れ た だ 所 
で ボッ ボッ と 音 が する の で す が , エラ 
ー は 出 ま せん で し た だ ただ. それ か ら 。 7» 
キ の 方 で す が , 録音 レベ ル を 高く する 
iD, 自分 の マイ ユン に 合っ だ も の 
の 方 が 良い と 思い ます . 

ソン ソノシート の 取り 付け 方 に つい て で 
す が 5 2 月 号 で 失敗 し て し まい まし た 。 
も う 少 し 工大 し て ほし いと 思い ます . 
それ で は これ か ら も ソノ シー ト を 成長 
させ て くさ だき さい: 


マリ ン ・ ダ イ バ ー 


像 が 付い て いた で 


_ パソ コン DJ 大 成功 ! 
MZ-18OOrBOK/O — с> | 
モグ ラン ディ ング 
BASICIZASCIIE— 
プ し て ほぼ しい 


き マ リン ・ ダ イベ バー, モグ ラン ディ ング 
@ プ レイ ヤー : テク ニク ス SL-1600 


吉川 寧 一 


アァ ンプ テクニ クス SU-7700II 
оз: VA IX-KRD-WS 
デッキ : タク ニク ス RS-650U 


@80K/C の 方 は ATRI X1 の マ 


リン ・ ダ ' イ バー は マシ ン 語 の ロー ド は 
うま くい っ た ものの, BASIC プ ログ 
ラム の 方 が チェ ッ ク サム ・ エ ラー て , 
どの よう な 条件 で も ダメ で し た (0 
ав-~ 8 ав). そこ で 考案 し ます . 
BASIC プ ログ ラム の 方 は ASCII セ エー 
ブ し た も の を ソノ シー ト に 録音 で どき な 
いで し ょ うか :, 時 揚 は 長く か か り ま す 
が 。 ロー ド の 最後 の 方 の わずか の 
READ ミ ス で す で て アウ ト と いう よ 
うな 事 が な く な る の で すか ら . Х10 
2700 ボ ー な ら ソ ノシ ー ト の 録音 時 間 
が な く な る こと も な いと 思い ます . 


PC-8800 シ リー ズ 


The Jail 


ダビ ング し て kK. 


Т, この と き 。 TONE の つま み を 
BASS い っ ぱい に 下げ , TREBLE 
は 真ん中 , レベ ル は 十 3 dB に し ます . 
そし て W デ ッ キ で グラ イコ 録音 で ダ ' 
ビシ ルン グ し ょ まず <6%%; JO0MEE 
400Hz を 一 - 番 下げ , 1KHz を 真 ん 
бє, 4KHz DKHzt—4€ Eu. 
パラ ンス は 左 か 右 , レベ ル は 十 4 dB 
に し ます . デー タ ・ レ コー タダ の 方 は ロ 
ー ド ・ レ ベル を 8 で らい に すれ ば O. 
K. Z 


MIKH 


Q7—774— 505 (成功 ), マ リ 


ン ・ ダ イメ バー (失敗 ) 


@ コ ロン ビア SR-K61F—7 1 7 J-36 


>A 


GSR-K61FiZ カセ モット ・ デ ッ キ 内 蔵 だ が 


実験 の 結果 失敗 に 終わ っ た . それ で 音 
量 を 6 (0 一 10) に し て アイ ワ の に 録 
T 2 と み ご と 一 度 で 成功 し た . 一 方 
マリ ン ・ ダ イ バ ー の 方 も 同じ 方 法 で や 
っ た が カウ ンタ ー21 あ だ た だり で 
Checksum error が 出 た , 5 一 6 回 
や りり 直し な だ が うま くい か な か っ た . 
これ は だ ぶん ソノ シー ト に 傷 が 付い て 
い だ の で 針 が と ん で し まっ だ の だ と 思 
2; 

欲し い プ ログ ラム . ザ ・ ユ クビ ピット, 
珍 き ん 麻雀 、, ポ ボップ ・ バ ルー ン , A. 


プレ イヤ ーー レコ ー ダ で 
С.К! 


Q»7—774SOS, е) v-X45 


TEE RU 


の プレ イヤ ー : ソニ ー の 15 年 くら い 前 


の 古い モジ ュ ラ ー ス テレ オ 
ー タ ・ レ コー タダ ": シャ ー プ CZ-8 
RL1 


ゆみ モッ ト ・ デ ッ キ を 持っ て いな い の で 


接続 コー ド を 買っ て き て 直接 デー タ ・ 
レコ ー ダ に 録音 し た と ころ , 5 回 目 で 
や っ と も ロード で きよ ま よしだ. 


ZHI AOD 


イラ スト 1 を 見 て も ら え ば わか る と 思い 


ます が ,「 キ ー 入 力 」 一 「 方 向 別 の 変数 設定 」 


っ 「 移 動 」 一 「 変 数 更新 」 の 処理 を , へ び 
君 が 何 か に ぶつ か る まで 繰り 返す と いっ た だ 

流れ で す . 
この 全体 の 流れ を つか ん で いな いと 頭 が 
混乱 する 原因 ほ と な る の で , 後 の 自 分 の 健康 
イラ スト 1 


@) 
[8] 
Ke] (ез 
(122 


今 一 と ) 頭 と か の 位置 
677 の 変数 の 内 容 
z5 。 を 新しい も の に 
する ん だ よ ! 


@ 


の だ た め に も し っ か り と 考え ん を まとめ て お き 
ませ う ね . これ は 前 回 も 述べ だ こと で すね . 

と ころ で , この 場合 だ と ③ で 動く べき 方 
向 の キャ ラ を 読み 込ん で な いて , その 結果 
に 関係 な く 一 応 移 動き せ て , ⑥ に お いて ③ 
の 結果 を 見 る ん で すね . こう する と , 自分 
の 頭 が “か で " や “自分 の 尾 っ ぽ "” に め り 
込ん で 。 ゲー ム ・ オ ォ オー バー に な る の で す 、。 
tU, ⑥ を ③ の すぐ 後 で 処理 さき せる と どう 
な る で し ょ うす わか り ま すね . ぶつ か る 
寸前 で ゲー ム ・ オ ー バ パー に な っ ちゃ うん で 


プロ グラ ム の 流れ 


わか る か な ? 


手紙 を くだ らい. 


表 1 変数 表 ( リ スト 1 用 ) 


mom 


IEL 


尾 っ ぽ の ポイ ンタ 
尾 っ ぽ の 長 さ 

キー 入力 

キャ ラク タ ( 頭 ) 

次 の 座標 キャ ラク タ ・ コ ー ド 
(SCREEN 文 に て ) 


表 2 変数 表 ( リ スト 2 用) 


頭 の 位置 の V-RAM の アド レス 
方 向 
尾 っ ぽ の ポイ ンタ 


尾 っ ぽ の 長 さ 

キー 入力 

キャ ラク タ ・ コ ー ド ( 頭 ) 
PEEK し た 値 


Ж... 

後者 の 場合 は , 進む べき 方 向 が “か で べ で" 
etc で ある な ら ば , 進め な い ぞ お 一 と いう よ 
うな ゲー ム に は 有効 (を それ で な く て は つま 
ら ない) С. 

同じ よう な こと で も 。 ゲーム に よっ で て は 
その 処理 の 仕方 と か 順番 が 違っ て くる わけ 


表示 と 判断 


イラ スト 1 の ③ と ④ に 関係 する 所 な の で 
す が , 表示 と そこ に 何 が ある の か を 調べ る 
の に , 2 と お り の 方 法 が 考え られ る と 思い 
$t. 

まず は , LOCATE X t PRINT X # f£ 
て 表示 し ,SCREEN 文 で その 座標 の 位置 を 
読み 取る 方 法 で す ( リ スト 1). この 方 法 

イラ スト 2. ビデ オ RAM (V- RAM) と は 


V-RAM の 内 容 が 文字 や 
記号 は た また , グラ フィ 
ックス と な っ て , 表示 さ 
れる の で す ! 


p 3 月 号 の クラ ちゃ ん あな た は 私 が JR-200 を 買っ た 動機 と まっ た く < 同じ で すね . た し か に 買っ た と き は バカ に され まし た . FM や X 1. 
PC ユー ザー な ど に, 「JR の ゲー ム ・ ソ フト な ど 見 た こと が な い 」 など と 言わ れ ま し た . た し か に ソフ ト は 少な いけ れ ど , 100 本 も 200 本 も 必 
hbd tA. 5 一 6 本 あれ ば 充分 で す . 性 能 ち も 1 つ 1 つ みて ゆけ ば , 他 に 負け ませ ん / JR-200 の カタ ログ が ほし けれ ば , U.A.C.C. ま で 
JR-200 は 良い 機種 ご す ョ ./ P.S. PC-1500 返 えせ ー ク ググ スン ノ 


pL 


lk, 又 と Y の 座標 を 使っ て 処理 する の で す 
3j, この 方 が 初心 者 に は 理解 し や すい で し 
25. 

を そし て も う 1 つ の 方 法 で す が , POKEX 
で 直接 ビデ オォ RAM (V-RAM と 言っ て , 2 
こ へ キャ ラク タダ ・ コ ー ド を 入れ て や る と 画 
面 に を の キャ ラク タ が 表示 る れ ま す ) へ 書 
SAAT, PEEK 文 に より そこ に 何 が 書か 
れ て ある か を 読み 取っ て 判断 する や り 方 が 
あり ます (リス ト 2). 

V-RAM の エリ ア は 当然 機種 に よっ て 違 
いま す が , SCREEN 命令 の な い 機 種 で は 後 
ыт кыыз 直接 メモ リ を ア 
クセ る: 滞っ こま ТУЫ РОА 
us n そん な に や や こし いこ と 


図 1 方 向 に よる 各 変 数 の 対応 


LOCATE Х,Ү 


POKE アド レス , キャ ラク タ ・ コ ー ド 
ー32 


—1 «—? > + 1 


2 
(PC-6001 の 場合 ) 


1 XXXXXXXXXXXXXXXXXXXXXXX 
2 Г УК ФИК Эн 1 X 
2 REM XXXXXXXXXXXXXXXXXXXXXXX 
7 REM し ょ きせ っ マ Ljs 

8 CLS:CONSOLE 8,16,80,0 

19 DIM AX(253) ,AY (256? 

20 X0-146:Y0-28:X-20:Yz280 :65-222:K-71:l. 


REM 
REM X 


30 FOR I-8 TO _:АХ‹1) =Хӣ:АҮ 1) =Ү 


48 NEXT:GOSUB 490 :LOCATE X0 ,Y8:P 

RINT "p" 

49 REM mul, 335 She 

50 G£$-INKEY$:1F G$=CHR$(&H1C) TH 

EN X=1:Y=0:C$=" k" 

68 IF G ま =CHR 生 (&kH1D) THEN X=-1:Y= 
a 1 C= " 4 " 

70 IF G$-CHR$(kKHIE) THEN Х=0 :Ү=- 
1 : С%= " AL 

89 IF G$-CHR$ KH LF) THEN X=0:Y=1 
: C$= " 

Әй IF X428 OR Y< う 9 THEN A=SCREEN 
CX9+X ,YO4Y) 

1808 LOCATE X9 „YQ :PRINT 

TE X0+X,Y0+Y:PRINTC$; 
185 LOCATE AXCGO ,AYCK) PRINT " " 
; :X0=X80+X :Y0=Y0+Y :AXCIO 2X0 :ñY (K) 

=Y9 
118 
139 
149 
299 


K-K*1:IF K-L THEN К= 1 
IF &«X»&H280 THEN 308 
GOTO 58 

REM ñ ha 

300 LOCATE 18,7:PRINT 
=к- | s" : END 

399 REM “Mha 

400 CLS 

418 PRINT " ———————Snake 


EE 
—nEF A 


428 FOR Ісі TO 13: PRINT" |" 
055" |" ; : NEXT 

430 PRINT " —— —— —By.Geimukai.j 
іп-------і“ 

448 RETURN 


"ры! oh 


бате-- 


;SPCCS 


Ш リ スト 1 LOCATE, PRINT, SCREEN 方 式 Fg | 


" #" : LOCA 


も な く 〈 く 考え 方 さえ わか れ ば 前 者 より か な り 
処理 が 楽に な り ま す . V-RAM の 概念 は イ 
ラス ト 2 を 見 て も ら え ば わか る と 思い ます . 

それ か ら , 尾 っ ぽ を 消し て ゆく アル ゴリ 
ズム に つい て は 前 回 お む 話 し だ 通り で す の で 
④ と ⑤ の 所 を じっくり 解読 し て 前 回 の あの 
図 と 照ら し 合わ せ て みて くだ る さい . 

な お ぉ 今回 の プロ グラ ム は , ぶつ か っ ちゃ 
うと メッ セー ジ を 出力 し て END と な り ま 
7. 各 変 数 の 意味 は 表 1, 2 に 示し ます . 


ending 


次 回 か が ら は , この メイ ン ・ ブ ログ ラム に 
いろ ん な 肉 付 け を や っ て いき ます . 

BASIC の 文法 が あま り わから な い 人 は , 
この 講座 (を 言う ほど で も な い カ わが) を 読ん 
で も 少し わか り に くい と は 思い ます が , Z 
の 点 は 文法 書 な ど が いろ いろ 出版 され て ま 
TOT, そちら で 少し 勉強 る きれ て か ら こ の 
講座 を 読ん で みる 方 が 良い と 思い ます . 

で は , まだ 来 月 な 会 いし ませ う . 


AEA rt А 6 ココ きん で か 』 Br: A. 
い 3 ん な その に t 
| атсаз En 


快 人 


7 ッ ス 9 ント 、 2/4 ME. 021985. 
diit e л 


Mzaa. わな りや すく 
Abk 
い u です 
Ha 


NE リス ト 2 POKE, PEEKZ; x 


REM XXXXXXXXXXXXXXXXXXXXXXxXx 
REM X Тл лс 9 uc» 2 X 
REM XXXXXXXXXXXXXXXXXXXXXXX 
REM し ょ きせ っ で Lis 
CLS:CONSOLE 8,14,08,0 

19 DIM AD‘ 256) 

20 AàD-&HC310:P20:C-&H14:6-232:K-71 


FOR I-0 TO L:AD«I»-AD:NEXT 
GOSUB 409:РОКЕ A&D,*H14 

REM Wh, 433 Sha 

G$-INKEY$:1F бФ-СНРФс%Н1С>2 TH 
P=1:C=%H14 . 

IF G$-CHR£$X&H1D) THEN P--1:C- 


78 IF G$-CHR$(&H1E) THEM Р--32:С 
=&H11 

8a IF бФ-СНРФМНІҒ) THEM P=32:C= 
&H12 

98 IF Р<>й THEMA-PEEKCAD*P) 

188 POKE AD,&H23:POKE AD*P,C:AàD- 
AD*P:POKE ADCK) ,82:65DCK) =AD:K=K+ 
1 
118 
138 
148 
299 


IF ド =L THEM K=1 

IF à£»&H20 THEN 300 
GOTO 58 

REM ñ っ Ya 

300 LOCATE 19,7:PRINT 
ちゃ っ た ュ " : END 

399 REM b'” dha 

488 CLS 

418 PRINT " —————— —— —Snake.Game— 


"рі! oh 


жос" 
420 FOR 1=1 TO 13:PRINT"|" 
8) $" |"; NEXT 


;SPCC3 


438 PRINT " L————— ——By.Geimukai j 
in— a mo Ü" 
448 RETURN 
BASIC 講 座 の リス ズ スト に つい て 
リス ト は PC-6000 シ リー ズ 用 で す が , 少 し の 改造 で 他 機 
種 に も 簡単 に 移せ ます . 他 機 種 の 人 は 記事 を よく 読ん て 
移植 に 挑戦 し て みて くだ さい . [P| 


(PC-1500 で マン ショ ン 11 階 か ら の 落下 テス ト を 行なっ た UP + ARROW) 
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今月 号 か ら は , PiO や I/O の 編集 部 を 技 
術 的 に サポ ー ト し て いる エン ジン ルー ム の 
中 の PiO チ ー ム が 質問 に 答え て いく こと に 
な けり まじ た 。 

今 ま で は チッ ク ・ ピ ビオ さん が ユー モラ ス 
な 回 答 を し て , 一 部 彼 が わか ら な か っ た こ 
と だ け を エン ジン ルー ム が サポ ー ト する と 
いっ た こと を し て いた の で す が 。 これ か ら 
は 初め か ら エ ンジ ン ル ー ム が 答え る わけ で 
$. 

ユー モア に は 欠け る と 思い ます が , その 分 。 


各 機 種 ご と の エキ スパ ー ト た ち が ど ん な 難 ・ 


問 も 答え て いき ます の で , ヨロ シク ン ノ P 


ラジ オ に 雑音 が 入る 


> 最も 簡単 な 解決 方 法 は , パソ コン と ラジ 
ォ の 2 つ を 同時 に 使わ な いこ と で す . な ん 
て 解答 で は 話 に な り ま せん ね . それ で は 雑 
音 の 原因 を 考え て み ま し ょ う . 

雑音 は パソ コン の 電源 が 入っ て いる と き 
だ け 発 生 し ます . つま り ッ パソ ュ ン の 動作 が 

音 を 作っ て いる わけ で す . パソ ュ コン で 作 
6 れ た だ 雑音 は アン テ ナ か ら ラ ジオ に 入り , 
私 達 の 征 に と どい て し まう の で す 。 

アメ リカ で は , 雑音 に 対す る 規制 が 厳し 
ORD, 雑音 対策 が し っ か り し た 製品 が 作 
られ て いま す . この 対策 法 の 多く は , パソ 
コン か ら 雑 音 の も と と な る 電波 の も れ を な 
くす こと で 実現 きれ て いま す . その だ た だ ため に 
本 体 の ケー ス の 中 に は 鉄 の 網 が 埋め 込ま れ 
も いま す 。 


これ と 同じ よう な こと を 手軽 に 実現 し て 
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O) ©) P 先日 , 「PiOBOX」 に , プロ グラ ム を 送 ろ うと 思い た ち , Г 
Ол Ол TS 原稿 も きち ん と 書い て 出し まし た . 次 の 日 , な ん の 気 な し に PiO 1 月 号 を 眺め て いる と, p.181 に … こ れ 以 上 悲し く て 書け ませ ん . 


み ま し ょ う . 本 体 を バラ し て , プラ スチ ッ 
ク の カバ ー の 裏側 に , 放熱 用 の 穴 を ふる が 
な いよ うに アル ミホ イル を 張り 付け ます . 
レミ ホイ ル で ショ ー ト し て いる 所 が な 
いこ と を 確か め て 本 体 を 組み 立て ます . 最 
初 に 電源 を 入れ る と き は , すぐ に 電源 を 切 
る 心 の 準備 を し て お いて くだ さき さい. も し, 
アル ミホ イル で ショ ー ト し て いる 所 が あっ 
た とき に 被害 を 最小 に する だめ です. 
余談 で す が , 友人 の K 氏 の 話 に よる と , 
パッ コン の 雑音 は ゲー ム な どの 効果 音 に 使 
うこ と が で きる そう で す . 氏 氏 の 愛 機 は あ 
ОТК-80В5С, 今 の パソ コン な どの は ょ よう 


に PSG な ど は 付い て いな い の で す . AM の 

ン デ ィ ラ ジオ を CPU の 近く に 置い て 雑 
音 を 効果 音 と し て 楽し ん で いる 人 物 な の で 
す . (T.K) 


3 E Ё. の rr で 3 テー・ he) 
^ ! (sen eis T) 


X20 Rot. 
hee AZE 
«aC... d 
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ok 


ユー シッ クタ ク 、 


жалы: こと が で きる で し 
E 栄 市 N,,-BASIC 


pAl. 困っ た に 質問 で すね . 正式 な 読み 方 
や 呼び 名 は ある と 思う の で す が 。, 私 は 知り 
ませ ん . どう 読ん で も 意味 が 通じ れ ば それ 
で も よい と 思う の で す が … 
PA2. DISK BASIC を 立ち 上 げ る と 。 > 
ィ イス ケッ ト か ら デ ィ イス ク ・ ユ コー ド (DISK 
BASIC 自 体 を 動か す プ ログ ラム ) が メモ リ 
上 に ロー ド され, DISK BASIC が 使え る 
よう に な り ま すず DISK BASIC に は 。 ? 
ァイル の 操作 な どの 命令 が 豊富 に ある た め 
8.5KB も メモ リ を 消費 し て し まい ます . 
ゲー ム を 主 に 使う 場合 は 最低 限 ロ ー ド と 
も セー アガ が で きれ ば Mi いわ け で す この よう 


な 機能 を 持っ た DOS を 作れ ば , 必要 以上 
に メモ リ を 取ら れ な いで すむ よう に な り ま す . 

一 般 に . この よう な DOS を ゲー ADOS 
と 呼ん で いま す . (T.K) 


PEO, 
Е-Е. -AL 29. Pn 


八戸 市 間 上 ら ぼ 


ドラ イブ か ガ ら 「 ジ ィ ジ ィ …」 
кекке д 

ケッ ト を ドラ イブ ヒビ セッ ト す る と 。 ЖО” 
イス ケッ ト を 使っ て いる た めか , 「 ジ ィ ジ 
イ …」 と 音 が 鳴り っ ぱな し に な る の で す . 
この まま 使っ て いて 問題 は な いで し ょ うか . 
| 相模 原市 佐藤 考 紀 
> ディ スク ・ ド ライ ブ は , fi, ФЕН, 信 
頼 性 な ど ト ー タ ル バ ラ ンス の と れ だ 外部 記 
憶 装置 と し て , か な り 5 普及 し て きま し た 。 
ディ スケ ッ ト の 品質 も 上 が っ て き て いる は 
ず で す . 

ディ スク ・ ド ライ ブ か ら の 音 の 原因 は ド 
ライ ブ の メカ で は な く , ディ スケ ッ ト の 中 
に 入っ て いる 円 盤 が 回 転 し て いる と き に , 
ジャ ケッ ト と 接触 し て いる 部 分 が 音 を 発生 
し て いる の で す . жоғалу КК 
込ん だ ディス ケッ ト で は 音 が 出 や すい よう 
tu 

この よう な 音 の で る ディ スケ ッ ト を 使っ 
た 場合 、 デ ィ ス ク ・ ド ライ ズブ に 対す る 影響 


は まっ だ く と 言っ て いい ほど な いで し ょ う 、 
し か し , その ディ スケ ッ ト に 大 切な デー タ 
を 入れ て お く の は や め る で き で す .。 も っ と 
は 構わ 
(T.K) 


も バッ ク ・ ア デップ を 取っ て ある 場合 
な いと 思い ます 。 


SM I 7 A 
上 福岡 TAKE 茨城 県 oy ey ー は ら 


マシ ン 語 を 勉強 で きる 本 は 


EOL MANS ERG силе 
Yt. PiO を 見 る と 。 マ : 
ラム が 才 い の で す が 。 わか ら な いこ と が あ 
Arv. — —< 
ブロ グラ ム を 作り 。 そ れ を アセ ンプ ル す 


どう せ 出 す な ら 実用 的 な も の を と 思い 「10 進 一 16 進 変換 プロ グラ ム 」 な る も の を 


間 上 ら ぼ きる ん の イラ スト が プロ グラ ム ・ ポ シェ ッ ト に 出 て た が ,. やっぱ りす ごい な. 


(相沢 ひる さん の イラ スト は どこ か 人 を 引き 付け る も の が ある と 思う 伊藤 光博 ) 


> 3$38AIxXEBASICOIR R CEEL, < 
LC, マシ ン 語 の 中 に 埋もれ て ゆく 〈 く 」。 с 
れ は 私 の 友人 F 君 の 言葉 で す が , 海老 原 君 
は この 転換 期 に き て いる よう で すね . 

入門 書 に は , マイ クロ コン ピュ ー タ の 入 
門 書 , CPU の 入門 書 , ンコ ン 機 種別 の 
入門 書 な ど が あり ます . この 中 で , CPU 
の 入門 書 に は 必ず 命令 に 対す る マシ ン ・ コ 
ー ド が 書か れ た だ 対応 表 が 載っ て いま す . € 
し て 個々 の 命令 群 に 対し て 動作 説明 が 書か 
れ て いる は ず で す . 

L3 MARK5 の CPU は 6809 で す か 6, 
6809 に つい て 書か れ た だ 本 を 使っ て 勉強 し て 
みて は どう で し ょ うか 。 ちな み に , 工学 社 
が 出し て いる 本 で は "6809 マ シン 語 入門 " 
が あり ます . (T.K) 


兵庫 県 佐藤 友則 


> 同じ よう な 質問 が 他 に も だ くる ん き て い 
ET. 


х C, PC-1251/H O = = X 1384 *-.11 月 


号 の この コー ナー に 載り まし だ が 。 PC- 
1245 で は 表示 桁 数 が 少な いた だめ , 右側 が 見 
ぇ えま せん . そこで, PC-1245 用 の モニ タ で 
す が, 今月 号 の PiOBOX に 載っ て いま す . 


これ を 使え ば , 今 ま で 載っ た PC-1245 用 の 
マシ ン 語 プロ グラ ム が 入力 で きま す . 


жә, マシ ン 語 に つい て は , ПОЯН 


“ポケ コン ・ マ シン 語 入門 " な ど を 参考 に 


すれ ば いい で し ょ 2 う 


= 5:Pio 27 "0023 n өлу, TUT ラム と 
まく うう 。 Фу 0358 Sedes / 
Xd) 


東京 都 健 


CUA TERKA... HLS Ep BBL. 
da РРС МЕЧЕ 


東京 都 猫 同志 社 


入力 方 法 が びわ ガ り ま せん 


(J.T) 


ぽく の PC-1251 の バー ジョ ン は 


この 質問 も 電話 で よく きま す . Š C, Ж 
(215 PC-12510PEEK&7FFF 2731277 > 
ー ジ ョ ン に つい て 何 も 書 いて あり ませ ん が , 
これ は PC-1255 と 同じ バー ジョ ン だ と 考え 
て くだ さる さい. で すか ら , PC-1255 の 欄 を 見 
れ ば いい こと に な り ま す (RAM の 容量 が 
違う こと に 気 を 付け て Л). (J.T) 


ы f, ® MES b: 1 
静岡 県 ば ん か ら は 〈 ち Жан HWD š k 


ロー ド & セ ー ブ が うま くい きま せん 


p 最近 の パソ コン は 性 能 が よく な っ て , カセ 
ッ ト ・ イ インター フェイ ス も 信頼 性 が 充分 に 
ある も の が ほとん ど で す . この 場合 , フ パ > 
ュ ン 以外 の 物 は すべ で て 同じ 構成 で や っ て い 
る わけ で すか ら 。 デー タダ ・ レ コー ダ k ty 
ュ ン の 相性 が 悪い の だ と 思い ます . 
相性 と いう の は , パソ コン の カセ ッ ト ・ 
イン ター フェ イス に 対す る デー タ ・ レ コー 
タ " の 再生 波形 の 問題 で び .、 どん な パソ コン に 
も デー タ ・ レ ュー ダ ' に 対す る 相性 が ある も 
от. 

ここ で 参考 の だ た め デ ー タ ・ レ コー ダ を 便 
うと き の 注 意 点 を 挙げ て お きま す . 
⑱ テ ー ジ は 一 般 的 な 会 話 ・ 音 楽 用 の も の を 
使う . 長き は 60 分 以下 の を 選ぶ こと . 
デー タ ・ レ コー ダ ' の ヘッ ド や キャ プス タ 
ン は 常に クリ ー ニ ング し て お お く 〈. 
ロー ド ・ レ ベル の 最適 な 所 を 探し て 目印 


愛知 県 今井 明 広 


福岡 県 相沢 寛子 
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GAME 63€ 1! Ёл efe 
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大 垣 市 


高知 市 Bit 眼鏡 河 馬 
を 付け て お く . 

⑥ 外 部 の 磁気 の 影響 を 受け な い 所 に デー 
タ ・ レ コー ダ を 置く 。 だ と えば CRT デ ィ 
スプ レイ の すぐ で 近く は 絶対 置く で べき で な い . 
リモ ー ト や ポー ズ を 使っ て , テー を 長 
時 間 止 あめ た まま に し な い . テー に 段 が 付 
いて , 以後 ロー ド ・ エ ラー の 原因 と な る . 

⑱ カ 2 セッ ト ・ イ ンタ ダー フェイ ス の ケー ブル 
iz, 細い 線 が た くさ ん 入っ て いる の で 大 切 | 
に 扱 か う . 雑 に 使う と す で 断 線 し て し まう . 
(T.K) 


MZ-2000 用 WICS に つい て 


> MZ-2000 と MZ-2200 と は 基本 的 に は ま 
っ だ く 同 じ 機 種 で す . で すか ら MZ-2000 
用 の WICS の プロ グラ ム は MZ-2200 で も 動 
作 し ます . 

WICS は 使い こなす と か な り 良 い 言 語 だ 
と 思い ます の で , どん どん 使っ て すばらし 
ぃ い プ ログ ラム を 作っ て くだ る きい. (R.E) 


東京 都 BATTLESHINGO 26% 7/-ух/-ЕА 


MZ-1500 で 700 の ゲー ム は 走る 


»MZ-1500CZEPLIS を 実行 する こと は で 
きま す . この と きだ け , あな だ の 目 の 前 に 
ある MZ-1500 を MZ-700 だ と 思い 込ん で 使 


っ て くく だるい. 

PiO に 載っ た MZ-700 の プロ グラ ム の 中 
に は MZ-1500 で 実行 で きる も の が か な り 
あり ます . 当然 の こと な が ら MZ-1500 の 
機能 で ある PCG や 6 重 和 音 な ど は 使っ て い 
ませ ん が …. (RE) 
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Фо ЕКЕ УЛА е に 出力 する な る vA, E(nd) アド レス を 指示 どおり に 入力 


5000, 5FFF, D と いう よう に 入力 し ます . すれ ば OK で す . た だ し ,D000H 以 上 は 受け 
D の 代わ り に P と 入力 する と プリ ンタ に 出 付け ませ た: フリン 六 に つい て も W/NC さ 
J) 1265 sk. だ を える だ け で す . な お 。 DUDAS 
な お , プ ブログ ラム は 完全 リロ ケー タプ ブル な わな い 場 合 に は , 128 バ イト 出力 する ご 
で す が 。 一 度 実 行 す る と プロ グラ ム 自 体 を と に 一 時 停止 する の で 何 か キ ー を 押し て く 
書き 換え て いる の ぞ , 入力 し た ら す で に モ ゃ Z Wes: 
ー グ し て お いて くだ きい 、。 な お な 。 現在 の ス アド レス 入力 時 に | SHIFT + [| BREAK | で 
A—bFTRL-TAH$2000t t, モ ュ ユタ へ 戻り ます . 
MZ ノ -7008&80K Кыс: | プロ グラ ム ・ エ リア : 7000H 一 724FH. ST 
ART 7000H (転送 後 は その 先頭 ) 
先頭 アド レス か ら 実 行き せる と , 転送 先 転送 不能 エリ ア :0000H—11FFH, CD81H 
アド レス を 聞い て きま す . 転送 し た い 場 合 —FFFFH, 転送 前 と 転送 後 が 重なる 場合 
は アデ ド レス を 16 進 4 桁 で , 転送 し た く な い ЖІ : 48KK フ ル ん 実装 きれ て いな い 場 合 ,。 2 
FM-7 8 | 3 用 場合 は LCR」 キ ー の み を 入力 し て くだ さい . モリ の 入っ て いな い ア ドレ ス を 指定 し な い 
| > 転送 で き な い アド レス を 入力 する と ,。 メッ で くだ さい. RET 221 2tp b š +. 
フロ グラ ム を 実行 する と "START, EN モー ジ を 出し て 再 入 力 を 要求 し て きま す . 注 2 : MZ-700 で は ROM モ ニタ 上 で 動作 し 
D.P OR D と 聞い て くる の で , $5000» 6 - チ ェ ッ ク ・ サ ム を 見 る に は , S(tart) アド ます . 
i MZ-700&80K/C 用 チェ ッ ク ・ サ ム プロ グラ ムリ スト 
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?@48 El Зӣ 12 01 50 #2 ES йэ :64 7100 20 59 2F 4E 00 FF A3 08 :3E 71ЕӨ 39 10 C? FF 1F йй 280 Q8 :4E 
?@5@ ED 52 El 38 1D ES ED 42 :29 7108 FE 4E 28 11 FE 59 20 F5 :F1 7*1E8 FS ØF ЯҒ QF ЯҒ FF a3 aa :33 
7058 ED 52 El 38.15 FF AS 1 :0A 7110 FD 35 57 ЗЕ ØA FF ЯҒ 81 :Сй ?1Р@ F1 FS CD DR 05 FF ZA йй :B3 
7868 52 45 55 45 52 56 45 44 :6ü 7118 ЗЕ ӨС FF ØA @1 01 88 gg :D5 ?1Ғ8 CD 
ES 20 41 52 45 41 21 ØD йй :67 FM MEM MSN IIO v Pk C Ru duse minh А е ый eate 
r070 18 B? EB DS ED Bü El ES :F2 7128 FF OE gg El 18 EF 09 CB :C93 
7078 FD El 11 44 02 19 22 39 A9 7158 3D CB 3D CB 3D 2C 4D EB :B1 
--------------------------------- 7138 06 08 ES C5 FF C6 gg йр :за 

7148 0р GD 41 44 44 20 Ва AF :Б2 

7148 5? FF B9 88 20 2B @û FF :59 

7158 28 SA SS 95 4D 0D GO 00 150 

AM > SPP nS, 2 5 7C :D8 

uu. Өлі 12 13 44 49 46 7 ҰБН 7160 FF 87 @й 7D FF 83 00 1E :n3 
"aea 18 FD 75 05 FD 74 06 11 AF 7168 00 06 08 7E FF 76 gg 83 :84 
7088 48 FE 19 ЕЭ FF 72 01 BD :C? = E 
7890 28 43 48 45 43 4B 53 55 і2й PILS on AX IB Tr Be ЧТО FF АРС 
7098 4D 28 0D gù ЗЕ 53 FF 15 :25 RN co 2 ц 
HG 81 38 F9 ES ЗЕ 45 FF йр :A6 
TOAS 81 38 ҒӘ 01 ZE F8 AZ SF :3B 
гава ED 52 38 08 FF 41 йй 18 :AF 
ーー な om ここ 
?аса aa DB FE QF ЯҒ DS FF 38 :ü86& 
FOCS &1 aD 58 52 49 4E 54 45 : 


! [T] 
ж» Буз] 


Sum: 6D 18 B2 69 DB C4 31 3B 41 OD E6 1E OS 


Add +O +i +2 +3 +4 +5 +4 +7 +8 +9 ЖА +B +C +D +E +F Sum 
6200 34 20 Ер O1 2E AD FF FB FA ^6 BD O1 2D 4р 27 ЕЗ :79 
6210 Аё 8D O1 25 35 BD 24 ZF Có 14 E7 8D 01 15 A7 BD :56 
6220 01 17 30 BD 01.13-AaF 8D Oi OB ВЕ ОО O1 АЕ BD O1 :FD 
6250 06 50 BD OO FE AD FF FB FA 35 BF 24 ЗЕ АЕ 8D OO :04 
6240 ҒА A6 80 4D 27 O4 8D CE 20 F7 3585 BF 34 29 1F 89:12 
6250 C4 OF C1 OA 24 O4 CA 20 20 04 CO O9 СА 40 44 44 SFE 
6260 44 44 81 OA 24 04 BA 20 20 04 80 ОО ва 40 35 BỌ :54 
6270 54 59 81 40 24 O6 48 48 48 48 20 O6 BB O9 48 48 CS 
280 48 48 Сі 40 24 O4 C4 OF 20 04 CB O9 Са OF E7 8D :CB 
6290 OO AB AB 8D OO A7 25 B9 24 3F Cé 50 АЕ 8D OO 9B :D7 
6260 17 FF 4E 81 1F 23 OC А7 Во 17 FF ва SA 26 F1 éF : На 
62BO 84 55 BF 81 OD 27 F8 81 ОВ 26 ES 86 OB 17 FF 56 :EBZ 
42L0 86 20 17 FF 51 86 ОВ 17 FF 4C ZO 1F 20 D2 34 ЗЕ Bi 
62DO Аё 80 А7 AO 5A 26 F9 25 BF 24 ZD Có 10 4F АВ BO :9EB 
62Е0 5А 26 FB 55 BD 24 7D АҒ АВ 84 20 89 OO 10 SA 26 :ES 
62ҒО F7 55 FD 34 ЗЕ 10 AE 8D OO 41 Cé 50 17 FF СЕ 17 35a 


6020 
6050 19 EC 8D O3 85 ED 8D ОЗ 02 8р éF р 8D оз 05 26 : BB 
6040 OB 86 14 47 BD O1 D2 20 O6 86 OE A7 BD O1 CA 17 :79 
6050 02 D3 17 01 74 АЕ 8р O2 ES Có 10 17 OO BS 17 02 :3E 
6060 C4 30 89 ОО 10 AC 8D O2 D7 22 11 SA 26 ED 17 O1 :57 
6070 66 17 ОО ED Вр 1B АҒ 8D O2 C4 20 D3 17 O1 58 17 :8Е 
6080 ОО DF 17 O2 АО F6 FF FE 81 FE 27 ОЗ BD E6 28 Z5 :34 
6090 FF 34 SF óD BD 02 АВ 26 ОЗ 17 01 55 17 O2 6 17 :45 
6060 02 83 17 O2 ВО 17 O2 7D 25 BF 34 7F 86 14 47 BD :29 
60BO0 01 67 17 02 70 30 80 O2 C7 17 07 57 17 O1 D9 АЕ :66 
60CO 8D O2 78 34 04 Có 07 Аё 84 17 O2 28 А7 BÒ SA 26 :2Е 
60DO Fó 55 04 AE Вр 02 64 EC 81 17 O1 94 А7 8D 02 5E : 7D 
6ОЕО EC 84 17 O1 BB А7 8D O2 56 50 ОЗ EC 81 17 O1 BO :D7 
оғо 


Sum: 77 58 BD 2B EC 21 52 50 АВ 06 2E AO 9С ва А7 28 :B8 


Add +û +1 +2 +3 +4 +5 +6 +7 +B +9 +A «B +C +D +E +F Sum 
6300 FF 39 55 BF 34 3D 81 61 25 06 Ві 7A 22 02 Во 20 :59 
8510 55 BD 34 ZF Cé 04 AE BD OO 21 A6 84 BD Ев А7 Bo :4F 
6520 SA 26 F7 55 BF 54 ЗЕ 86 OD 17 FE ЕА Bé OA 17 FE :15 
6530 ES 55 BF OO OO 00 00 00 OO OO OO OS ҒА OO OO OO :DB 
6340 00 OO OO OO OO OO OO 41 64 64 20 20 2B 30 20 2B :EF 
6550 51 20 2B 52 20 2B 33 20 2B 34 20 2B 55 20 2B 36 :AC 
6560 20 2B 37 20 2B 38 20 2B 59 20 2B 41 20 2B 42 20 :02 
6570 2B 43 20 2B 44 20 2B 45 20 2B 46 20 53 75 6D OO :73 
6580 20 55 54 41 52 54 2C 45 АЕ 44 2C 50 20 АЕ 52 20 :0E 
6590 44 20 20 00 55 55 4D 20 24 ZD 86 ОО R7 O2 O6 BD :oC 
|65А0 Её 81 BD ЕВ 04 55 BD 54 SF Cé 04 F7 О? O6 34 OZ2 :74 
6ЗВО BD E6 84 55 O2 BD ЕВ 20 35 BF O2 78 ОО ОО OO OO :91 


93 ОА FE 


184 


⑯ ブ ルー タス 


(ホッ ト ・ ビ ィ ) ҰЗ,800 
PC-6000 シ リー ズ ( カ セッ ト 版 ) 

RUN RUN RUN & RUN, 走る た め に 
生ま れ て きた 男 ブ ルー タス . お 前 に 与え ら 
れ た 時 間 は , JUST 1 万 時 間 . それ まで に し に, 
お ぉ 前 は この 不気味 世界 を 旅 し て , JORE 
城 ブ グー ルー を 捜し 出 き ね ば な ら な い . 


5 名 


【 当 選者 発表 】 


ЖЕЗІСЕНЕГ 
T TNI 
: 福島 県 いわ き 市 М 英治 
: 神奈 川 県 川崎 市 大 沢 道 英 
・ 。 山梨 県 山梨 市 星野 正裕 
・ 奈良 県 生駒 郡 寺田 和弘 


茨城 県 東 茨城 郡 福田 昭一 
* 商 品 到着 まで 1, 


45555515 


A 4. と 


B Dot Dot lš 


ぴい えす 
オー ル BASIC で と て も 短い で す が , 意外 
に 遊べ ます . 暇 な 人 も そう で な い 人 も ぜひ 
入力 し て くだ さい . な お , この ゲー ム は 2 
人 用 で ジョ イス ティ ッ ク が か が 必要 で す . 
遊び 方 
ルー ル は 至っ て 簡単 で す . プレ イヤ ー1 
は カー ソル ・ キ ー で , プレ イヤ ー2 は ジョ 
イス ティ ッ ク で それ ぞ れ 8 方 向 に ドッ ト を 
繰り ます . そし て 先 に 周り の 壁 か ドッ ト に 
ぶつ か っ た 方 が 負け と な り ま す . 
プロ グダグダ ラム に つい て 
この プロ グラ ム は スピ ー ド を 重視 し だ だ 
b, メイ ン 部 は IF の 代わ り に ON GOTO 


РіО 3 月 号 プ レ ゼ ント ・ ユ コー ナー に , 
pa EGE A ES 


2 週間 か か る 場合 が あり ます . あら か じ め ご 了承 くだ さい 、. 


BEEN oo 


C e 


号 で 行ない ます . 


OTHE COUNT 


(スタ ー・ ク ラフ ト ) Y7,800 
FM-7/NEW 7 (5 イン チ 版 ) 
ある 嵐 の 夜 の こと , 旅 の 途中 で 一 夜 の 宿 
を 求め る きま よっ て いた 君 が , ОЖСО 
中 に 見 た 古城 . 雷 風 雨 の 中 , や っ と の 思い 
で た どり つい た を その 城 の 玄関 口 で 君 を 迎え 
て くれ だ の は …. 
3 名 


333 027 5*7? 

? 

љот k オオ キナ ЮЛ” АЛ” ツイ テイ ルル = 
172 %ІТАт” オチ テテ イル = 

220 325» 577%. 

M 


抽選 の 結果 

975441081 
石川 県 金沢 市 RAM 
大 阪 府 大 阪 市 ” 松野 康 利 
CAT PII MEME TT. 


r mm) ([» вы 


ーー マッ ーーー لا‎ LA 225222 


を 使用 し て いま す . あと スコ ア な と 初め に 

0 に 設定 し て いま せん が ,。 それ は 280 行 を 

見 れ ば わか る と 思い ます . 

その 他 
書き 忘れ まし だ が プレ イヤ ー 1 が 画面 の 

上 の 方 で , 2 が 下 の 方 で す . それ か ら 再 ゲ 

ー ム は |SPACE| キー で す . 


Dot Dot BASIC リ スト 


16 SCREEN4 2, 2: COLOR1, 6, 2: CONSOL 
Е,,.9:С-4:б--4:А-40:В-20:Е-212:Ғ 
=172 

20 LINE (0,9) – (254,192) 
(5,5) - (252,188) , 0, BF 
зе ОМЅТІСК (9) БОТОВе, 90, 100,119, 1 
20,130, 140, 150 

40 PSET (A,B) : A=A+C: B=B+D: ОМРОІМТ 
(A, B) GOTO240 

50 ONSTICK(1)G0T0160,170,180, 196 
,200,210,220,230 

40 РЅЕТ (Е, Е) :Е=Е+6: Ғ=Е+Н: ONPOINT 


si, BF: LINE 


・ ク ラフ ト , ヴィー クル 
KD, 抽選 で 13 名 の 読者 の 万 に 下記 の 各 製品 を プレ ゼン ト し ます . 


Aw suas スタ ダー 


官製 ハガキ に 右 下 の シ ー ル を 貼り , 
は 学年 希望 の ソソ フト ウェ ア 名 称 (下記 で 紹介 し た ソフ ト の 中 か ら 1 
つ だ け ) を ハッ キリ と 記入 し て , 
レ ゼ ント ・ コ ー ナ ー 宛 に 送っ て くだ さい . 


jk : 応募 シー ル の 貼っ て いな い ハ ガキ は 無効 に な り ま す . 


多数 の 方 々 より ご 応募 いた だ き あ り が と うこ 


Ө ファ ミリ ー ペ パージ улт > 


ソフ ト さ ん の 協力 に 


MSR al 


⑥〒 住 所 ② 氏 名 年 齢 ⑱ 隊 業 ま た 


5 月 7 日 (消印 有効 ) まで に PiO Z 
な お, 当選 発表 は PiO 7 月 


ӨТ АСНАМСЕ L-2 


(ヴィ ー ク ル ソフ ト ) ж4,800 
X1/C/turbo (カセ ッ ト 版 ) 
ライ ル が 漂着 し だ た コロ ニー レル L2 は 。 ау 
ピュ ー タ ・ ト ラブ ル に より 壊 減 十 前 。 無人 
の コロ ニー の 中 で 待ち 受け る 数 々 の 危険 と 
障害 . コン ピュ ー タ が 狂っ た だ 原因 を 知る と 
き の 衝撃 . 


5 名 


埼玉 県 坂戸 市 川島 義隆 
福島 県 福島 市 菅野 真 
新潟 県 新潟 市 坂本 健一 郎 : 
栃木 県 宇都 宮 市 W 和浩 
岡山 県 岡山 市 菊池 康治 


> や の の の の の < 


(Е.Е) 65010250 

70 5-5%1:0650Т030 

80 C-26:D--4: GOTO46 
909 C-24:D--4:GO0TO46G 
100 : D=@: GOTOAQ 
110 :0=4: GOTO406 
120 :0=4: GUTU49 
150 :D-4: GOTO46 
140 : D= の : BUTU49 
159 :П--4:06507040 
160 -—4:GOTO66 
179 : H=-4: GOT069 
180 : Hzó: GUTU69 
190 :Н-4:60Т060 
200 : H=4: GOTO66 
210 -4:Н-4: GOTO6O 
220 —4:Hz0: GOTO6Q0 
230 -4:Н--4:650Т7060 
240 
250 
WIN 
260 PLAY"ci1","el",."gi1":LOCATE11, 
7:PRINT"score "S 

279 IFSTRIG (0) -G0GOTO2760 

289 RUN 


9-4 л 
Tm 


55595! 


r Z G G G G G) G) G) 0000000 
= 


C Б Ow Р т кя ш ы ЫЗЫ ДИД! 


CATE10,9: PRINT"FLAYER"N-*1" 


PiO パ ザール 


PRS 


ФРВ-410 2 ¥9.5~12K (ゲー ム ・ ウ ォ ッ 
チ を 1 つ 付 ける ). 半 13K で 買っ て くれ た 
Дей, ゲー ム ・ ウ ォ ッ チ 2 つ 以上 付け 
iT. まず は W〒 で . 
4,241 横浜 市 旭 区 白根 町 589-37 

菊地 政 昭 


ФРС-1261+СЕ-124+ 24 7 2 V [5] 

\22K. МТС. 

@ 274 千葉 県 船橋 市 田 喜 野井 4-9-20 
PHI 


ФРС-1245%Ұ5.5К, МТТ. 
@ 593 堺 市 毛穴 町 373-5 
上 村 和 伸 


韻 PC-1245 十 説明 書士 ポケ ッ ト BASIC 入 
門 を \5K で 売り ます . МТС. 
Ф 792 愛媛 県 新居 浜 市 萩 生 2632-1 

Xii HTL 


ФРС-1255--СЕ-125% ¥25KL1 E. まず 
は W〒 で . 
€ 142 東京 都 品川 区 戸越 39-16 戸越 
ュー プ 204 
峰 松 56 


&PC-1251+ ж & XY1IK, PC-1245( 多 少 

X*Xb55)*?XAK, PC-1500. Ұ15К, 

Ф 466 名 古屋 市 昭和 区 雪見 町 1-2 
鵜飼 行 和 


Ф CE-161 (16KRAM) * Y25K 前 後 で >ë 
り ま す , іТтаутт. 
а 336 浦和 市 元町 2-23-10 

吉村 竜太 郎 


d PB-200-- £ # Y6K Ç 5 v. 

TT. 

$ 343 埼玉 県 越谷 市 登戸 町 5-11 
HH E u. 


まず は W 


ЖЕССТЕ 6816199) - 
21-19 8 02. 


ААА 


Azli 


ке کاو‎ 24000808, 
2RIBRÉA $ 、35 円 394407.) 
も ( く は 、・ JR200 (9-3 13 -,7. 


E. 
bia ay 07, JOYSTICYT, 
А тис". AESA 


Wa saa 


2Ë 4 
e ex ya 


p 


ФРВ-300--СНА-1(7) 7 Z HHEH) 
+ ラ イブ ラリ #¥10K. РС-1255, 


PC-1251 な ど と の 交換 も 可 . 早い 方 優先 . 


至急 W〒 で . 
Ф 136 東京 都 江東 区 南砂 3-2-24-6 


d$ PB-100 (PB-200 に ある [F| キ ー を 自作 

し まし か た ) 十 OR-1+FA-3 填 FP-12 を 

\10K. TEL を 書い て 〒 で . 

Ф 251 神奈 川 県 藤沢 市 規 沼 海岸 6-6-28 
鳥島 朗 広 


あま FM-7 用 ジョ イス ティ ッ ク 「]OY- 

7X, %ҰЗК, WITT. 

Ф 674 兵庫 県 明石 市 魚住 町 清水 1531 
山崎 和博 


186 


d$PC-6001mk II 十 保 証書 (3 箇月 ) 十 グリ 
ー ン ディ スプ レイ キジ ョ イス ティ ッ ク 十 
〆 を ぎ 60K. 値 引 可 . TEL を 書い て 〒 を 
送っ て て だ きい に 。 
Ф 424 静岡 県 清水 市 山原 290-45 

佐野 勝彦 


Ф PC-6001mk II ( 完 動 ) + PC-60M43 (+ 

ズ ア リ ) 十 カセ モッ ト ・ レ コー ダマ ニュ 

アル 十 本 を \60K 以 上 で . 

W 432 静岡 県 浜松 市 鴨 江 3-54-6-205 
山下 Йй] 


Ф PC-6001mk II Y32K, また, DR- 
3218441) C Y38K, PC-6041 を \9K. Ж 
料 は こち 6 ら 持 ち も . で きれ ば W〒 で . 

Ф 721 広島 県 福山 市 笑 島 町 5816-80 


柴野 公 志 


&$PC-6001mk II + PC-6082--Z a4 Z > 
4 y 2 +TV» — 7 v ¥ 350K ñij t$, 
MZ-721+TV ケ ー ブ ル オ + 関 係 図書 十 々 を 
ぎ 20K 前 後 . x, + > FC Y65K Ç. 
FM-7 キ データ ・ レ ュー ダ と の 変換 可 . 
まず は W〒 で . 
W 551 大 阪 市 大 正 区 泉尾 2-9-7 

福田 Ж 


d$ PC-6001mk II (i ff) +Z a 4 A7 4 
ッ ク 二 キー ボー ド ・ カ バー+ 付 属 品 一 式 
土 ROM ゲ ー ム ・ カ ー ト リッ ジオ 関連 雑 
誌 オ コー ディ ング ・ シ ー ト 十 み を 侍 45 一 
48K€ 6v, まず は TEL (日 、 金 , 月 の 
P.M.7:30—) X. 
Ф 468 名 古屋 市 天白 区 福 池 2-311 

岡田 幸 泰 1% (052) 896-1456 


d$ PC-6001mk II + PC-6082 # Y40K Д Е. 


まず は W〒 で (で きる だ け 早 め に )、. 
@ 532 大 阪 市 淀川 区 西 中 島 2-2.5 907 


2 
郡山 勝彦 


ФРС-6001--РС-6006% Ұ20--25К-С. 
Ф 338 埼玉 県 浦和 市 上 木崎 5-2-22 
金子 敬三 


ФРС-6001--РС-6006-- ж 2 Y25— 35K. 
希望 価格 を 書い て W〒 で . 
@ 463 名 古屋 市 守山 区 小幡 北山 2758- 
675 

iK EX 


d» PC-6001 十 PC-6006 (キズ #) + ж を 

¥20K 6 6v T. 

Ф 168 東京 都 杉並 区 和泉 4-45-21-210 
KH 新 


ФРС-6001%Ұ15К, PC-6006 を 7K, + 
y F C YƏ20K. 

€ 176 練馬 区 氷川 台 
# EH — р 


14-37-8 . 


利 PC-6001 二 付属 品 キ ゲー ム ・ カ ー ト リ 
ッ ジ 5 本 を ぎ \20K で . 
W 869-05 熊本 県 下益城 郡 松橋 町 曲 野 
3349 

高野 剛一 


Ф PC-6001--PC-6006--EXAS BASIC 

コン パイ ラ 二 ジョ イカ ー ド + 付 属 品 十 

を ぎ \24 一 28K で (送料 込み ). 

$ 794 愛媛 県 今治 市 大 正 町 2-4-4 
渡辺 一 功 


ФРС-6001 L РС-6006 # Y20—25K C. Ж 

VR 67—2-*va—AX, ジョ イス ティ 
ッ ク , 関連 図書 の 相談 に も 応じ ます . 希 

ARH と 価格 , TEL を 書い て 〒〒 で . 

@ 565 大 阪 府 吹田 市 佐井 寺 4-6-7 
勝 本 洋二 


dMZ-731(8& X- R, 完 動 ) 十 マニュアル 


FEM ALSK TEL ま た は 〒 で . 


® 359 埼玉 県 所 沢 市 上 山口 382-1 
中 村 和 正 1% (0429) 23-5988 


d$MZ-721-- ENE + a ¥ Y30—40K C. 


Ф 520-32 滋賀 県 甲賀 郡 甲西 町 菩提 寺 
330-474 
鴻上 大 二郎 


&$ MZ-721 十 関連 図書 士 付属 品 十 箱 を 
Y25K. ま だ X1C を ぎ 80 一 90K( シ ル バ ー 
無 キズ 完 動 ) いち ば ん 高く 買っ て くれ 
る 人 優先 . 
Ф 085 北海 道 釧路 市 武 佐 39-1 花田 
善夫 方 

戸 嶋 利 徳 


Ф MZ-1500 を Y50—60K, PASOPIA 7 
を \20 一 40K. МТС. 
© 470-01 愛知 県 愛知 郡 東 郷 町 白鳥 3 
19-7 

小森 宏樹 


Ф MZ-1500 を \60K で 売る . また は PC- 
8201 と の 交換 も т], W〒 く だ さい . 
Ф 422 静岡 市 小鹿 3-15-18 

中 神 英 帝 


ФРС-8001тк を \50K で 売り ます . 
9 501-62 岐阜 県 羽島 市 正木 町 須賀 赤 
松 238-5 

УЛ 


Ф PC-8001(X х) кт аж F 

(РСС Y 7 M FI) +РС-8044+РС-8031- 

IW +PC-8033 キ シス テム ・ デ ィ ス ク 二 

説明 書 を \60K 前 後 . 〒 で ( 望 近県 ). 

9192 東京 都 入 王子 市 長沼 町 134-208 
KHE 


Ф M5pro-- BASIC-G + JS-5+ Bf ж [d Ж 
ЖҰ15--20К, まず は 〒 で . 

$ 240 神祭 川 県 横浜 市 保土ヶ谷 区 天王 
町 2-46-6 


小池 幸夫 
あま FM-7 キ + デー タ ・ レ コー ダナ マニュア 
ル 十 本 (4 冊 ) 二 キーボード ・ カ バー を 
Y70K, МТС. 


@ 436 静岡 県 掛川 市 青葉 台 752-4 
水谷 和志 


あま FM-NEW7( 完 動 , キズ 少々 有 ) 十 本 2 

冊 二 々 を ぎ 70K 以 上 (送料 込み ). 条件 の 

良い 人 を 優先 . TWTT. 

W 372 群馬 県 伊勢 崎 市 日 乃 出町 398-2 
立川 € 


dM5jr.-BASIC-Za4 X> 4 > 2 + 
ゲー ム ・ カ ー ト リッ ジ を 20K, ファ ミ 
リー ベー シッ ク を \10K, PC8801/8001 
用 家庭 用 TV アダ プ タ を \4K. W〒 て . 
370-03 群馬 県 新 田 群 新 田町 木崎 
1022 番 地 

笹原 淳 


d$ MZ-731 +РСС-700+ n — v * < —5$ 
ー2 巻 YA5—50K, 専用 ディ スプ レイ 
М2-1005 ғ Ұ20--30К, また は セッ ト で 
MZ-2000--GRAMI, П, Ш+а OX 
ЖЬ ч, まず は 〒 ま た は TEL(P.M.8:00 
--10:00) C. 
@ 185 東京 都 国分 寺 市 本 多 5-7-6 
HRR 7%(0423) 24-3575 


d X1 G-RAM +1/O 28 - F IPLA 4 

ッ チ ナ + キー ボー ド 延 長 コ ー ド + 関連 図書 

を ぎ 80K. ТЕ Ало ЕТЕР. 

@ 402 山梨 県 都留 市 上 谷 47-13 
高尾 芳 久 


理 PC-8801 十 関連 書籍 十 箱 を \70K 前 後 
で ( 望 近 県 ). 
@ 526-01 滋賀 県 東 浅井 郡 び わ 町 曽根 
926 

中 川 雅 彦 


Ф PC-1500+CE-150+CE-155+CE-156 
+CE-157 十 関係 書籍 多数 を \35K 以 上 で 
25927. どれ も 完 動 美 品 。 説 明 書 付き 


©З. も ちろ ん バラ で も 売り ます 。 と に 

b < 安 〈 売 り ま す . 早い 者 勝ち . 

$ 592 大 阪 府 高石 市 千代 田 4-2-2 
図師 覧 木 


d$PB-100--OR-1-- FA-3 + FP-12 + HR 
説明 書士 関連 図書 どれ も ほとん ど 無 キズ 
で 完 動 を \12-15K で . 高く 買う 人 優先 . 
TEL 記 入 〒 か TEL で (P.M.6: 30~), 
Ф 728 広島 県 三次 市 三次 町 1618 

中 間 大 介 1% (08546) 3-1596 


名 ジョ イス ティ ッ ク (JOY-602X) を \3K 
(送料 込 ). 
W 412 静岡 県 御殿 場 市 駒 門 476-5 

勝又 敏幸 


&M5(# Z L, 付属 品 有り ) 十 BASIC-G 
+ ジョ イ パ ッ ト 1 組 ナ + ゲー ム ・ カ ー ト リ 
ッ ジ 3 個 ( ケ ー ス な し )+MR-11DR を 
¥25K T, 
т 940 新潟 県 長岡 市 土合 5-5-7 

山崎 陽介 


中 エガ SG-1000II 二 カー トリ ッ ジ 3 本 を 
ぎ 7K ぐ で らい で 。 いつ まで も 待ち ます . 
v 571 大 阪 府 門真 市 岸和田 888 

ALB БЕЛ 


dUo5X-rXdM»277vv7u»27 

*Y25K, 〒 か W〒 で . 

Ф 285 千葉 県 佐倉 市 新 臼 井田 19-7 
松本 亜紀 彦 


„жа; 


$77i9»—avVUa—ZR?Y5K, 2 

ー ト リッ ジ は 1 個 \1K. WFT. 

Ф 346 埼玉 県 久喜 市 吉羽 字 沼 向 1365-7 
TE ña УЯ 


Ф CE-126P +CE-152+ 7 = x 7 >v # 

Y20K. PiO'844F11 H 3 2305K. WF 

T, 

Ф 187 東京 都 小 平 市 小川 町 1.944-22 
滋 谷 正樹 


JR- oo + RF ユン ドー タ am. 


Ұс-251- CEI24 FOES 


СЪР ЯФ т^, 2-3? (Чо HTB" 
多少 。 キ は あぶ > て も きい きせ ん し 。 ) 


Мт“ 60. 23 1 1 Pio 
72311-3] 


заза База 3n 
ze? 
A. ¥ 


€ PiO[3], 84411 H9 t #&%#05К € 6 
t MT 
Ф 710 岡山 県 倉敷 市 米 立 浦 407-5 
西 HX 


を $PC-6006 を \7K で . 〒 待 っ て いま す . 
Ф 049-45 北海 道 瀬 棚 郡 北 栓 山 町 字 徳 
島 38-3 

小川 篤 


ФРС-6001 ЗЕХА5 BASIC じ コン パイ ラ 
?£Y3—5K. TEL を 書い て 〒 で . 
@ 421-02 静岡 県 志太 郡 大 井川 町 利 右 
ェ 門 2722-7 

清水 研一 


を ファ ミリ ー コ ンピュータ た を 平 5.5K, 2 
ー ト リッ ジ を 1 本 \1K(5 本 以上 望む ), 
ファ ミリ ー ベ ー シ ッ ク を \5K (いずれ 
も 送料 込 , 箱 付 ・ 完 動 品 )、 PC-8001mk 
II を \35K (ЖЖБА), まず は W〒 で ". 
we 701-02 岡山 市 藤田 536 

渡辺 d 


PIOU 年 11 月 号 を \0.5K( 多 少 古 く て 
も 破れ て な けれ ば TT), I/O Ж? a 
ン ・ マ シン 語 入 門 を 壮 1.9K 以 下 で 安い 人 
優先 . どちら も W〒 て . 
Ф 864 熊本 県 荒尾 市 大 和 区 6 班 3 

坂井 宏行 


を Pi0'84 年 11, 12 月 号 , '85 年 1 月 号 を ま 

LOó5CXL5K, また は 各色 0.5K で 買い は ま 

Ж; 

e» 430 静岡 県 浜松 市 寺島 町 138 番 地 
租 内 一 弘 


PiO'84 年 6 月 号 * YO.SK, 1I/O'83 #12 
月 号 を \0.4 氏 (送料 込み )、W〒 で . 
電 799-01 愛媛 県 川之江 市 金 生 町 山田 
井 1528 

長野 輝久 


$PiO'84 年 11 月 5 2 ¥0.6K, 9, 10 月 号 
を それ ぞ れ ぎ \0.5K. まとめ て 売っ て くれ 
る 人 歓迎 . W〒 て . 
W 014 秋田 県 大 曲 市 大 曲 西根 字 嶋 村 
100 

小原 巧 ・ 


€PiO[3], "84 年 4-9 月 号 を まとめ て ぎ 3. 
5К, PC6001mkII 用 EXAS コ ン パ イラ 
+РС-60062 Ұ9К. まず は W〒 て . 
@ 626 京都 府 宮津 市 宮村 1413-1 

上田 義之 


を PiO| 2185 年 1、2 月 号 を 3 冊 ま と め て 
WK, і72214ҒЖО5К, ソノ シー ト が 
付い て いる 場合 に は 必ず ソノ シー ト 付 き 
Т. 
@ 082 北海 道 河西 郡 芽 室町 西 一 条南 五 
VH 

5 mE 


人 @ フ ァ ミ リー コン ピュ ー タ , 本 体 を 
БК, ゲー ム ・ カ ー ト リッ ジ を ぎ 1.2KK で 
買い ます . 少々 値上げ 可 . 連絡 待ち ます . 
т 164 東京 都 中 野 区 中 野 3-42-3 

浅野 博 通 
€PC-8001Imk II + = a 7»v, ЖТ 
いい か ら 安 〈 売 っ て くだ さき さい. な る で く 
Ех. 
W 551 
17-2-403 

西原 Ж 


大 阪 府 大 阪 市 大 正 区 つる 町 1- 


ФРС-6006 を \3 一 4K. 完 動 品 で あれ ば 

多少 キズ が あっ て も 結構 . 

343 埼玉 県 越谷 市 南町 1-22-3 
相沢 勇人 


$ FM-7 用 周辺 器機 グラ フィ ッ ク ・ プ 
リン タ ②5"DD③ 各 種 ボ ー ド な どい ろ い 
>, 完 動 で 定価 の !% ぐ らい の 価格 で . 
W〒 を いつ まで も 待ち ます . 
電 157 世田谷 区 給田 4-25-24 

志田 в 


ФРС-6001ЗЕХА5 BASIC コ ン パ イラ 

と エディ イタ ・ ア セン ブラ を 各 伴 4K で. 

バラ 買い O.K. 

Ф 250-01 神奈 川 県 南足柄 市 飯沢 694-2 
瀬戸 登 


を MAX マ シー ン 用 の MINI BASIC ぎ 3 

~4K, ゲー ム ROM1 つ \1~-2K で , WT 

を 気長 に 待つ . 

@ 591 大阪 府 堺 市 中 百舌 鳥 町 4-486 
南部 達也 


€77iJ/)—a2vC6ao—Z*YX6K, 2 


ー ト リッ ジ を 1 つ \1K 前 後 で . 
Ф 501-42 岐阜 県 郡上 郡 八幡 町 下 愛 客 
BI 

井上 英紀 


ФРС-60062 YSKIAVJ C. 
т 358 埼玉 県 入間 市 新 久 895-41 
金子 健一 


€ Pi0'84 年 11 H 5 を Y05K Ç (p.179 の 
「 簡 易 モ ニタ 」 の と ころ が 完全 な も の ). 
至急 願い ます . 
e 375 群馬 県 藤岡 市 中 栗須 300-3 

横田 義道 


$PC-6006 を \5K 前 後 (安い 人 優先 ). 3 
ず は 〒 で いつ まで も 待ち ます . 
® 310 茨城 県 水戸 市 千波 町 1421 

飯塚 光宏 


Ф OFP-1011PL + FP-1085PRC を ¥30K 
前 後 。②FP-201RAM を \10K 前 後 。③ 
FP-231CE を \15K 前 後 , ④FP-205ROM 


を \5K 前 後 で . 連絡 は 〒 で (TEL 明 記 ). 


& 485 愛知 県 小牧 市 久保 一 色 216-117 
^t HU 


Ф PCG-8100 か PSA (P8) 2 Y20K ij Ж. 


送料 こち ら 6 持ち も . まず は 〒 か TEL(P.M. 
19:00—) C. 
W 440 愛知 県 豊橋 市 小浜 町 170 

前 野 忠 重 2 (0532) 46-4978 


Ф М7-1Р07 か MZ-80P6 キ イン ター フェ 

イス サケ ー ブ ル を き ぎ 40K. MZ-1U01 を 

¥10K. WFT. 

«€ 920-03 石川 県 金沢 市 古 府 町 南 1059 
横山 公 一 


を PCG-8200 を \ ぎ 14K で らい . 送料 は そ ち 
ら 持 ち . W〒 待 つ . 

@ 239 神奈 川 県 横須賀 市 津久井 359 
高 本 勝広 


€ PCG-8200( 完 動 無 改造 ) ち を な る べく 客 

Е а аай 

e 611 京都 府 宇治 市 伊勢 田町 中 山 17-5 
魚 留 雅弘 


€ (D GP-80D (МЕХ) を ҰЗОК, @ М2- 
1200 用 倍速 ボー ド を \8 一 10K, @М7- 
1200 に つなげ られ る プリ ンタ オオ ケー ブル 
-MZ-80 1/0%Ұ40--45К, 価格 は 送料 
込み で す . WT. 

電 070 北海 道 旭川 市 春光 台 4 条 5 I H 
A-6122 

岩松 哲男 


ФРС-1401, 1261 を 適 価 に て . 
Фф 485 愛知 県 小牧 市 小牧 原 新 田 117-3 
伊藤 浩美 


人 す ベ ベーシック マス ター 活用 研究 1K. 


iTWTT, 
Ф 77102 徳島 県 板野 郡 北島 町 太郎 人 
須 字 外 開 2-102 

宮内 計 典 


疹 当方 …PC-8801 キ グリ ー ン ・ モ ニタ 十 

y—4:va—Z--HYX1-—-5K, 

貴方 …X1 か FM-7 士 CRT 

¥ 510 三重 県 四日市 市 西 日 野 町 55-5 
徳山 靖 記 


Y 7; --PC-1255C] X CE) 十 説明 書士. 


ソフ トウ ェ ア ラ イプ ラリ [4|]+ マ シン 語 
エディ タ 必 ゲー ム 入 り カ セッ ト ( 要 イン 
ター フェ イス ) 十 ぎ \5K 

貴方 …PC-1350( ソ フト ウェ ア ・ ラ イプ 
ラリ 等 が あれ ば ぜひ 付け て ほし い ), 
TEL を 書い て W〒 て . 

а 166 東 京都 杉並 区 梅里 2.19-9 Аоф 


PiOBAZZAR 


荘 1F3 号 室 
定本 明男 


Y 当方 …PB-100+OR-1 十 関連 図 (>? 

E 

貴方 …PC-1245 か PC-1250. その 他 シ ャ 

ー プ の ポケ コン な ら ば \5K く らい まで 

な ら 足 し ます . PC.1350 な ら ば \10K 足 

L2T. Л ЛИТ. 

Ф 338 埼玉 県 浦和 市 皇 山 町 2-2 
ЖЕ 


疹 当方 …PC-1261( キ ズ 無 し )、 マニ ュ ア 
№, 4. ハー ド ・ カ バー 
貴方 …PC-1401+ マ ニュ アル + ハー ド ・ 
カバ ー, PC-1245 十 \8K か CE-125,。 また だ 
i4X13KcC565 #7. TC. 
Ф 520.23 滋賀 県 野 州 郡 野 州 町 新 上 屋 
233 号 

柴垣 純 


Y 47;--PB-100--OR-1—- FA-3+ 2° — 4 
の 本 十 マ ニュ アル 十 新 品 電 池 


貴方 …①PC-1245 十 CE-124, ②PC-1251. 


② の 場合 +\2K, ② に CE-124 を つけ れ 

ば #5K WTC: 

$ 274 千葉 県 船橋 市 人 木 が 谷 2-40-1 
KREA 


Y 47; ---PC-6601 +PC-6042K + PC-6082 

貴方 …①FM-7/NEW7②X1/C+ デ ィ ス 

И ИГЕ. 

Ф 657 兵庫 県 神戸 市 灘 区 浜田 町 3-1-15 
塩田 誠一 朗 


疹 当方 …FP-1100(V1.1) 十 RF モジ ュ レ 

ー タ 十 本 士 資料 (サブ プ CPU マ ニュ アル な 

Ё) +а 

貴方 …PC-6001mk 11 +a. その 他 の 機種 

も 相談 で . 条件 に よっ て は 芋 40K ま で 付 

け ま す . 条件 を 書い て W〒 で 

Ф 485 愛知 県 小牧 市 久保 一 色 2093-8 
佐々 木 一 郎 


Y 当方 JR-200 十 RQ-8200 十 本 

貴方 …①PC-1500 二 付属 品 二 4K RAM, 

Q)PC-15014- 付属 品 、③PC-1501+ 付属 

品 寺 CE-150.③ の 場合 は PB-410 と 付属 

n 付け ま す . 

т 530 大 阪 市 北 区 池田 町 1-2-733 
小谷 知 由 


9$ 当方 … ス ー パ ー カ セッ トビ ジョ ン ナ オツ ソ 

フト 3 本 十 \2K 

貴方 …①CE-124 十 使え を る 4 る レコーダ, ② 

CE-126P, @¥5~10K € らい で 売る . x 

料 こ ちら 持ち . 

e 184 東京 都 小金 井 貫 井 南町 1-2-8 
牧野 建 正 


@ 当方 …PB-100 二 OR-1( 説 明 書 , ケー 

ス 付き ) 十 入門 書 

itJ;--Pio[1]-[3]. "84 年 4 一 6 月 号 ( 切 

5 抜き 不可 ). 

e 144 東京 都 大 田 区 南 六郷 3-13-6-201 
塩 手 智 彦 


Q 47 --FM-7C8 «£3H MEA, キズ な 

し ) - fA 07 —7»v-77R89—a3 

ンピュータ 

貴方 …①PC-8801/mk II, QXIC, Ға 

も 完 動 , キズ 可 . WT. 

Ææ 277 千葉 県 柏 市 布施 1、 076-10 
飯田 清和 


当方 …]R-200 十 図書 2 冊 十 付属 品 
貴方 …①PC-1501+CE-150, (ФРС-1350 
+СЕ-126Р, Q)PC-1255--CE-126P, (4) 
РС-1251--СЕ-125, WFT. 


РС -1501 + ライ アラ リ f 
(ほぼ 新 ІЗІ) 


RS (W そ ょ > 
M5 (pres) + BASIC G ss PC-1251 + 
CE-425 (feo PC 25-2 t MOSHER (эч) 


T 392-31 
ENR -(9R5RD/RRÉ DIARÉ, 381-2 
NR pR 
WT &f$.2024. 


© 416 静岡 県 富 全市 本 町 15.29 
高井 円 


Y 7; ---MZ-721+GB-10+ #3 +ТУ 

likir —72 v +a 

中 方 …①MZ-1200+GB-10 ま た は PCG- 

8000 寺 本 + 付属 品 , ②PC-6001mk II + 

デー タ ・ レ ョ コー ダ ' 二 本 十 付 属 品 , ③ そ の 

他 の パソ コン (な ん で も OK/) ま だ は 

Y38SK( 6 C965, まず は 〒, жаз 

の 人 は W〒 て . 

& 360-01 大 里 郡 江南 村 成 沢 1157 
関根 E£ 


qQ47;--PC-1261(X* XH, マニ ュ ア ル 
付 , 箱 な し ) 
貴方 …①PC-1251、②PC-1255, QY14K 
で 売る ( 完 動 . マニ ュ ア ル 付 ,。 キズ は 構 
いま せん ). 送料 こち ら 6 持ち.*〒 で お 願 
いし ます 。 
352 埼玉 県 新座 市 池田 4-3-24 

上 田中 Hë 


Y 当方 …PB-400 
貴方 …①PC-1245。 ファ ミリ ー コ ユン ピ 
ュー タ , ③SC-1000 キ ソフ ト , (DXIOK, 
まず は 〒 で . 
612 京都 府 京都 市 伏見 深草 大 亀谷 
万 帖 敷 町 522 

Ж 正人 


欧 当 方 …PC-8801+MR-11DR (デー タ ・ 

レコ ユ コー ダ ) 十 オマ ケ 

貴方 …①PC-6601SR 二 その 他 , DEF 

ォ (ベー タ ). ① の 場合 , 付属 品 。② の 場 

合 は 機種 , 性 能 を 書い て 〒 て . 

Ф 321-43 栃木 県 真岡 市 並木 町 3-24-8 
(r | 129, 


@ 当 方 …MZ-731 二 付属 品 填 関 連 図 書 

中 方 …PC-6031+ ケ ー プ ルキ + 付属 品 . 〒 
г е 

W 673-05 兵庫 県 三木 市 緑ヶ丘 町 東 3-6- 
5 


中 田 芳雄 


Bc ло АЛК, 行 番号 マッ プ , アド レス ・ マ ッ プ , 7 
ー ク ・ エ リア な どの 表 が 付い て いま す . これ ら 6 の 表 は , その プロ . 
グラ ム を 移植 し た り , 解析 し た だ た りす る 人 だ た だ たち に と っ て も あり が だ 
いも の で , 大 変 い い 傾 向 だ と 思い ます . 

一 方 , 原稿 中 に は "プログ ラム に つい て " な どの 見 出し で 始ま 
る 部 分 が あり , ほとん どの 人 は プロ グラ ム の ご く 《 大 ま か な 解 説 を 
書い て いま す . 確か に こう いっ だ も の も 重要 な の で す が , 私 と し 
て は も っ と プロ グラ ム を 作る 上 で 工夫 し た 点 や その 結果 , 考え だ 
し た 自慢 びき る テク ニッ ク な ど を も っ と 発表 し て ほし いと 思っ て 
いま す . 

ちょ っ と 話 が 硬く な っ て し まい まし だ が , 先日 ひる びる に プロ 
グラ ム を 作っ て , 新しい テク ニッ ク を 思い つき , こん な も の は 後 
か ら 同 じ よ うな プログ ラム を 作る 人 の だめ に 公開 すべ でき だ な と 思 
っ だ か ら で す . | (А) 
ШЕН, 東京 に 雪が 降り まし だ た だ. も う 春 だ と いう の に , こり ゃ 異 
常 気 象 の を 前 ぶれ か な …? IT, ここ で クイ ズ で す . この 原稿 は , 
いつ 書い た の で し ょ うか ? 答 の わか っ だ な だ 方 は , PiO 編 集 部 まで 
-, 正解 者 に は , 私 が ほめ て あげ ます よー. 

と ころ で , 先日 Shu 氏 が HiFi ビ デオ を 買い ひま し た . 近ごろ で は 
レー ザー ビデ オ と マイ コン を 使っ て , 実際 の 映像 を 使っ た ゲー ム 
が 発表 きれ て いる よう で す が 。, 将来 は 実物 の 戦闘 機 や 宇宙 船 を 使 
っ だ ゲー ム が で きだ りす る の で し ょ うか .。 オン ソロ シー ヤー /(О) 


較 今 月 号 が 発売 に な る ころ に は 『2010 年 」 が 公開 さる きれ て いる は ず 
な の で , 今 か が ら ワ クワ ク し て いま す . も う 小 説 は 読ん で し まっ だ 
の で スト ー リ ー は わか っ て いる の で す が , 映画 の 了 予告 な ど で , + 
宙 空 間 を 漂う ディ スカ バリ ー 号 の 姿 を 見 せら れ .『 ツ ァ ラ トゥス 


定期 購読 に つい て 
予約 申し 込み は 1 年 間 を 原則 と し ます . 
1 年 5,000 円 (送料 含 ) 
551/556 
1151 東京 都 渋谷 区 代々 木 1-37-1 ぜん らく ビル 5F 
株 式 会 社 工学 社 
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ЭЕТ ОЪ Др ЕАС 

Cb, 今 の 勢い コン ピュ ー タ が 進歩 する E, 2001 年 に は 本 当 
に HAL9000 が で きる か も 知れ ませ ん . そう な る と 。 コン ピュ ー 
タ 相 手 の 精神 分 析 医 と いう 商売 が 繁盛 し を う で す . (key) 
Ші 1m50cm ほ ど , 奥行 き 90cm ほ どの 私 の 机 の 上 に 雑然 と 置か れ 
て い だ 原 稿 の 山 も よう や く 片 づき , そろ そろ きれ い に し な けれ ば 
な あ , と 思っ て いる の で す が , 私 の 机 の まわ り に は 原稿 や 、 まだ 
封 も あけ て いな いい (ゴメンナサイ / もう 少し た っ た だ ら 中 を 見 き 
せ て い だ だ きま す の で …) 郵 便 物 な ど が ドッ サリ . も ちろ ん 机 の 
中 も いっ ぱい . さて きる て, これ ら を どこ に 置い た らい い の で し ょ 
57 

. を そう いえ ば 昨年 の 暮 に 大 掃除 を し て , 少し は スッ キリ と し た は 
ず な の で す . と ころ が 早く も その と き と 同 に ょ うな 状態 . これ も 


前 より 読者 の 皆さん か ら の 投稿 が ドッ と 増え た お か げ だ と 思え ば 。 


と て も うれ し いこ と な の で す が …. (V) 
ШУН, 久し振り に 秋葉 原 に ビデ オォ の 下見 に 行き ま した. と ころ 
が , 何 が どう な っ た か 自分 の 手 は ビデ オォ を 揚 っ て IST OT Б» АЛ) 

そう で す , 衝動 買い を し て し まっ た の で す . うぅ これ で 禁酒 禁煙 
で も する か … な . (Shu) 
男前 日 の 夜 に 考え て いた こと ょ と を 朝 , 寝 覚め の と き に 思い 起こ す と 
妙 に 落ち 込み ます . 目 覚め て いく に つれ て 立ち 直っ て いき ます が BE 
夜 考え だ た こと は , も う 半 分 くら い に し ぽ ん で いま す .。 そし て 。 š 
れ が 自分 に 無理 な く で きる 範囲 な ん だ な と 思い , ほっ と 胸 を な で 
お ろ し ます . 相変わらず 暗い / (Y2) 


, 


一 友だち が 車 を 買い まし た だ. БРС — 2 RI LD ,§ 


高速 に の り そ び れ だ り の , ハプニング 続き の ドラ イブ を 楽し ん で 
お り ま す . スピ ー ド 狂 の 気 の あ る 友 ど だ ち を 横目 で 見 つつ ,。 シート 


ベル ト に し が みつ く ス リル も 何と も いえ ませ ん . Eor h.g 
(IF) 


画 送 付 方 法 
④ 郵 便 振替 (88135-22510) 

裏 の 通信 欄 に , 必ず PiO 何 月 号 ひ ら ご 希望 が 明記 し て ぐだ さい . 
оттан 
③ 定 額 小 為替 

xg (00-—-90733k CC ФА SUA. 
(1,000 円 以上 の 切手 代用 は ご 遠慮 願い ます ) 


М5: 227777 
を 同封 し て こく ださい. 


昭和 60 年 5 月 1 日 発行 (毎月 1 回 1 日 発行 ) 
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イー. ア ル ・ カ ン フ ー 
RC725 Ұ4,800 
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ファ ミリー コン ピュ ー 用 カセ ッ ト 


けつ きよ く ぐ 南 極大 冒険 
RC804 Ұ4,500 


Vixe*3832 WAT283122 ға ы ы 


55202*-E&S90542. НЕС. b+ D RR 
と 切手 100 円 分 を 同封 の う え 、 住 所 ・ 氏 名 ・ 年 令 ・ 職 業 ・ 
お 手持 ちの ハー ド 名 を 明記 し 、 下 記 住 所 まで お 送り 
кгс 


一 通信 販売 で も お 求め で きま す 

人 現金 書留 で ご 注文 の 場合 … 住 所 ・ 氏 名 ・ 電 話 番号 ・ 
商品 名 を は っ きり 書い て 、 商 品 価格 + (送料 500 円 ) の 
合計 金額 を お 送り 下さ い 

人 銀行 振込 で ご 注文 の 場合 … 下 記 の 銀行 口座 へ 合計 
金額 を 振込 ん で 下さ い 。 振込 後 、 ハ ガキ て 住所 ・ 氏 
名 ・ 商 品名 を ご 連絡 下さ い 

< 振込 先 > コ ナミ 株 式 会 社協 和 銀 行 ・ 市 ヶ 谷 支店 ・ 普 
18249736 
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e —]- УР 
〒102 東京 都 二 代田 区 九段 南 2 丁目 3 番 14 号 靖国 九段 南 ビ ピル 4F 
TEL03-262-9111( 代 ) TELEX2323325KONAMTJ 
@ び MSX マ ー ク は マイ フロ ソフ ト 社 の 商標 で す 。 
る @ フ ァ ニ ミニ リー コン ビュ ー ダ タダ は 任天堂 の 商標 で す 。 
e この 商品 は 、 役 社 ( コ ナミ ) の 和 呈 諾 な し に 海外 へ の 出荷 は で きま せん 。 


е е 


Тхи @ 事 務 局 XWhitfsHiTBii-4-125| 

x <q ーー 「 コ ナミ マイ コン タラ ブ 」 係 ! 

@ 入 会 金 1,000 円 。 ` (大阪 駅 前 第 4 ビル !706 号 ) | 
ааа 055 о À 
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TOKYO (Japan) 


OSAKA (Japan) 
TEL 03-262-9111 FAX 03-261 -6211 


TEL 06-380-1331 FAX06-380-1360 


いつ で も テテ KC 


ナレ ビ ネ た バツ コン だ いつ し ょ に じ にし て し 42k、 これ は 
も う 、 あ まり に も 楽し い 。 ス ー パ ー イ ン ポ ー ズ 機能 
や 番組 自動 子 約 機能 な ど パ ソコ ン の マル チ な が 
機能 が テレ ビ の 楽し き を 倍増 し し 、 こ れ ま で 
テレ ば に も パソ コン に も で き な か っ た こと が 山 は 
ど で き る の で 二 テレ ビス パ ツ コ ン ・ ミ スタ ーPC。 
これ は つま り 、 先 進 技術 が 実は ちょ っ と 信じ ら 
れ な い は ほど 楽し いと いう 、 こ れ か ら の 党 識 の す 
ば らし い 好 例 な の で す 。 

テレ ビ と パソ コン を 遠く か ら 自 在 に コン トロ ー ル で 
きる ユニ ー ク な 赤外線 方 式 ウ イヤ レス キー ボー ト 。 

テレ ビ の 映像 じ \ ツ コン の 画面 を 自由 に 重ね 
られ る スー パー イン ポー ズ 機 能 を 標準 で 内蔵 。 

ビデ オ の タイ トル や テロ ッ プ 作成 が 簡単 に 
で きる 4 便利 な ば デオ テロ ッッ パー ソフ ト を 流 付 。 


E Ола ACA ERNER LM fosa 
好 RE 3 
PC-600l miris 


日 本 電気 グレ ルー プ NEC パ ソコ ン イ ン - 


7108 東京 都 港 区 三田 三 丁目 14-10( 明 治 生命 三田 ! 


1) 2 (03 


音源 つき 6 重 和 天 


フォ メー ショ ン セ ヤセ 


пуп у, Эм): 


7 つま で の 好き な テレ ビ 番 組 を 、 放 映 時 間 ヵ 
〈 る と 自動 的 に 選 局 し て くれ る 番組 予約 機能 。 

ATE UKASEAE O0 HAIR EU —7'n77 ММТ, 

カラ フル で 美しい 15 色 カラ ー グ ラフ ィ ッ ク 機 能 。 

自然 な 楽器 音 ・ 効 果 埋 な ど が 楽し ゅ る FM 
『8 オ クタ ー ブ サ ウン ド 。 


Moe 


@ パー ソナ ルコ ンピュータ (本 体 ・ キ ー ボ ー ド ) 
PC-6601SR 標準 価格 155,000 円 

@ る ティ スプ レイ テレ ビ PO- 下 V15 

Ф ボディ カラ ー : ブラ ッ ク メ タリ ッ ク / ワ イン レッ ド 


=i 
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コン ピュ コー タダ カシ ンド コミ ュ エ ケー ジン 


E し Ux 


} 成 機能 。 
1024 字 まで の 実用 漢字 ROM PR 


02 メ クタ メー プ の 音階 つき HP 


大 容量 320K バ イト ノド ライ ブ の 3.5 イ ンチ 
テイ スク を 1 ドラ イブ 実装 。 

PC-6000 シ リー ズ ・PC-6600 シ リー ズ の 資 
産 を 豊か に 受け 継ぐ 豊富 な ソフ トウ ェ ア 群 。 


1 標準 価格 94.800 円 а: 


xc E£ UL yr 
く の 販 売店 へ 


高 性 能 は ヒト を や る し する 4。 


89,800 R3 
ame ( ょ 話 番号 は 


よく お 確 め の うえ | 
)452-800( お か け く だ さい 


PC2000 ジ リーズ 
5-4 PC660lsn 


wa PC 980l; 


中 o _ 
сз Oy ` » 
本 体 標 準 価格 wu が NECO) プン フン ファ ミリ ー 
ооо pC-600ImrIl 
га pC-800ImrIlsn PC-8200 コ リー ズ ' 
PC-1002)J—Z'; ° PC-980IB 


eoo0 PC-600I muTIsn 5 スタ PC-6601 
20250 PC 880lmullin 
92 PC-9801l(i)/N5200 =s; 05:3: 


雑誌 17673-5 
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